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1. AHSTPACT 



THIS PPOCPAM ALLOWS THE USER TO CHECKCUT OP OLHUC 
KIT11-H(UNIBUS INPUT/OUTPUT INTERFACE). 

TO TEST* THE USER SIMPLY CONNECTS OUTPUT MODULE(S) a 
TO 'NPUT MODULE(S) (SEE SECTION 4.4), THROUCN THE SOFTmAPE moMTOPi 
thy .SEP ENTERS ADDRESS OF THE INPUT AND OUTPUT ; 

r«ODUl£S« THEIP VECTOR ADDRESSES. AND HOm THE « g 

USER HAS CONNECTED THEM TOCETHEPCFOR TEST ^' 
PURPOSES) (SEE SECTION 4.S). THIS PROGRAM CAN BE PUN IF 

A TELETYPE (OR TERMINAL) DOESN'T EXIST (SEE SECTION 4.6). ^| 



2, REQUIREMENTS 
2.1 EQUIPMENT 



€1 



2.2 STORAGE 



A. PDP-ll/blTH 4K CORE (OR MORE) 
P. KITll-HT 

C. KITll-H/WITH ONE OR MORE INPUT AND ONE OR MORE OUTPUT MODULES 
AND ONE ON INO M7i2l(OR COMPERABLE MODULE) 



THIS PROGRAM OCCUPIES CORE LOCATIONS 000000-12000 



S, LOADING PROCEDURE 

3.1 METHOD 



€1 



PROCEDURE FOP NORMAL BINARY TAPES SHOULD BE FOLLO«IEDI 

1, ABSOLUTE LOADER MUST i£ IN MEMORY. 

2. PLACE BINARY TAPE IN READER. mu 
J. LOAD ADDRESS •7500 (• DETERMINED BY LOCATION OF LOADER) ^ 
4. PRESS "START" (PROGRAM MILL LOAD). 

€ I 

4. STARTING PROCEDURE 

4.1 CONTROL SI*ITCH SETTINGS ^ ' 

STARTING AT ADDRESS 200 OR 210 ALL SNITCHES SHOULD BE SET AS INDICATED, ^ 

4.2 STARTING ADDRESSES J I 



(A) 



(b) 



IF I/O TERMINAL (I.E. TELETYPE) EXISTS LOAD AND 
START AT LOCATION 200. SEE SECTION 4,5. 



ir NO I/O TERMINAL EXISTS LOAD AND START AT LOCATION 210, 
NOTEl Xr HO I/O TERMINAL EXISTS* FOLLON PROCEDURI FdR NO TERMINAL SECTION 4,6, 



4.3 PI>OCI>A*« AND/Of) OPERATOR ACTIO^ 



LOAD PKOCPAH IKTO MEKORV, 

SET Si<XTCH PEGISTEP TO STAPTlhC ADDRESS. 

LOAD ADDRLSS, 

SET SMlTCHES ■ 0. 

PRESS START 

THE PROGRAM WILL TYPE AN "•• IF STARTED AT SA300i 

OR HALT AT LOCATION 7312 IE STARTED AT 5A310. USING THE rOH^'AT SPECIFIED IN i.b 
OR 4,6fENTER IN THE NECESSARY INFORHATICN AbOUT KITll-H AS fOLLOnlS. 

1) 1ST INPUT MODULE'S ADDRESS (EXAMINE THE MIOS IN SLOT B02 TO DETLRMINE ADDP). 
INITIAL DEFAULT ADDR IS 164000 (JUMPER 11 CUT). 

2) 18T OUTPUT MODULE'S ADDRESS (EXAMINE THE M105 IN SLOT BOl TO DETERMINE ADDR). 
IMITIAL DEFAULT ADDR IS 164010 (JUMPERS 11 AND J CUT), 

]) HOW INPUT AND OUTPUT MODULES HAVE BEEN CABLED FOP TEST 

(toHAT INPUT MODULES HAVE BEEN CONNECTED TO mHAT OUTPUT MODULES). 

4) VECTOR ADDRESS OF MODULES SELECTED FOR TEST (VI AND V3}, 

(EXAMINE THE M7e21 IN SLOT F02 TO DETERMINE THE VECTOR ADDR, OF 
THE 1ST ThO INPUT MODULES OR THE M7I21 IN SLOT F04 TO DETERMINE THE 
VECTOR ADDR. OF THE 2ND TWO INPUT MODULES), 

INITIAL DEFAULT VECTORS ARE 170 (JUMPERS 7 AND • CUT) AND 270 (JUMPERS 6 AND • CUT). 

i 

ALL INFORMATION MUST BE ENTERED OR AN EFROR WILL OCCUR IF STARTED. 

ALSO, ALL ADDRESSES MAY NOT BE ODD, NOR ANY VECTOR ADDRESS BE ABOVE 1000. 

4,4 CONNECTING MODULES 



TO TEST KITM-H, THE INpUT MODULES MUST BE CABLED TO OUTPUT MODULES. 
IF USING A BCOBR CABLE FOR CONNECTION, YOU MUST NOT "TWIST" THE 
CABLEi THAT IS| THE SMOOTH SIDE OF THE CABLE MUST BE UP ON THE 
INPUT AND DOWN ON THE OUTPUT MODULES. 

ONE OR MORE GROUPS UF MODULES MAY BE TESTED AT 
ONE TIME. SEE THE CHART BELOW FOR MODULE'S NUMBER, FUNCTION AND SLOT, 



MODULE NO. 


SLOT 


FUNCTION 


1 


• ■ 

EOl 


1ST. INPUT MODULE 


2 


E02 


2ND, INPUT MODULE 


1 


E03 


3RD, INPUT MODULE 


4 


E04 


4TH, INPUT MODULE 


$ 


CDOl 


1ST, OUTPUT MODULE 


6 


CD02 


2ND, OUTPUT MODULE 


7 


CD03 


9RD. OUTPUT MODULE 


8 


CD04 


4TH, OUTPUT MODULE 



V 



4.9 DIRCCTIVE 5UK><AltY (If I/O TEP^'I'oAL LXXSTSl 



THE SOriWABE HOWlTOP ALt.AYS TYPES AN ••• WHEN IT IS FIAOY TO * 
ACCEPT A COMMAND, THE FOLLOMINC ARE A LIST OF COMMANDS THAT 
CAN BE MADE WHEN IT IS IN THIS MODEl TMLY CAN BE ENTEPED IN ANY 
OPOEP AND CHANCED AT ANYTIME bHILE IN COMMAND MODE, 

NOTEI 

*.« INDICATES CAPHIACE RETURN. 

ALSO RUBOUT MAYBE TYPED TO DELETE PREVIOUSLY TYPED CHARACTEH(S) , 
COMMAND PUhCTION 



AIllXXXXO. SET ADDRESS IXXXXO AS 1ST. ADDR, OF INPUT MUDULES{S). 

AOllXXXXO. SET ADDRESS IXXXXO AS 1ST ADDR, OF OUTPUT MODUL(S), 

Vl^iXXX. SET XXX AS VECTOR ADDR, OF 1ST CROUP OF INPUT MODULES, 

vilXXX. SET XXX AS VECTOR ADDR, OF 2ND CROUP OF INPtJT MODULES, 

F(ULL). INDICATES TO PROGRAM THAT INPUT AND OUTPUT MODULES 

ARE CONNECTEDCFOR TEST) IN THE FOLLOWING MANNER 
1ST INPUT MODULE TO 1ST OUTPUT MODULE 
2ND INPUT MODULE TO 2ND OUTPUT MODULE 
3PD INPUT MODULE TO JRD OUTPUT MODULE 
4TH INPUT MODULE TO 4TH OUTPUT MODULE. 

1<6. ' INDICATES TO PROGRAM THAT THE tST INPUT 

MODULE IS CONNECTED (FOR TEST) TO 2ND OUTPUT MODULE. 

NUMBERS 1 THROUGH 4 ARE USED TO REPRESENT INPUT MODULES 

1 TO 4. NU>4BeRS 5-8 ARE USED TO REPRESENT OUTPUT 

MODULES 1 TO 4{RCSPECTXVELY) , 

THIS MODE OF ENTRY IS USED TO SHO«l SINGLE 

CONNECTIONS BETWEEN INPUT AND OUTPUT MODULES, OR 

IF AN ERROR OCCURS* TO ISOLATE A BAD MODULE BY MAKING 

A NEW PAIR OF CONNECTED MODULES. ALKAYS USE THE 

FORM "INPUT MODULE < OUTPUT MODULE," 

O(ISCONNECT). DISCONNECT (FROM THE PROGRAM) ALL MODULES, 

, CAN BE USED TO DISCONNECT MODULES AND ONLY CONNECT 

! 1 PAIR OF INPUT AND OUTPUT MODULES IF AN ERROR 

OCCURS (UNDER TEST) OR IS DESIRABLE TO RUN ONLY ONE PAIR 
OF MODULES, IF TESTING ONE PAIR OF NODULES AT 
A TIME, ALWAYS DISCONNECT (FROM PROGRAM) THE 
PREVIOUSLY CONNECTED PAIR. 

M(AP). PRINT OUT ALL ADDRESSES, VECTORS AND CONNECTIONS 

AS THE PROGRAM HAS INTERPETED THEM, 

S(TaRT). START TEST, NOTEI ALL NECESSARY ADDRESSES 

AND VECTORS MUST HAVE BEEN ENTERED FOR CONNECTIONS 
INDICATED, AND AT LEAST ONE CONNECTION MUST 
HAVE BEEN MADE OR THE PROGRAM WILL TYPE 
OUT AN ERROR AND RETURN TO COMMAND NODE. 



> 



*C CONTPOL AND "C" TYPtO SIIULTANEUU.SLY »tlL 

BRXNC THE nOGHkt* TVOf HUN KOOL' BACK TO 
COMMAND MODE (IF THE PRESENT TEST IS 
NOT TtSTXNC INITIALIZATION (RESET INSTRUCTION]). 

-P CONTROL AND "R" TYPED SIXULTANEOUSLV xILL CAUSE 

THE NUMBER OF PASSES AND NUMBER Of ERHOHS (IN OCTAL) 
TO BE TYPED OUT. THE PROGRAM WILL THLN RLTURN 
TO THE NODE OF OPERATION IT MAS DOING PRIOR 
TO 'R (EITHER "RUN MODE" OR 'COMMAND MODE"). 



4.6 DIRECTIVE SUMMARY (IF NO I/O TERMINAL EXSISTS) 



a halt at location 7212 indicatl8 program is 

in command mode. enter command in switch register bit 0*1 and press continue. 

all directives except start command hill halt at 

location 7226 for entry of an address if needed. whek 

running with no terminal make sure that program has 

halted at these locations* since if an error occured in 

entering addresses an error halt hill occur at location 

7466, after the program has been starred at 210* it may 

be restarted at 1000 and it will remain in *n0 terminal mode." 

for command mode halt at 72121 

Switch register action function 



10 
12 



PRESS CONTINUE 
PRESS CONTINUE 
PRESS CONTINUE 

PRESS CONTINUE 

PRESS CONTINUE 
PRESS CONTINUE 



14 



PRESS CONTI'lUE 



START TEST. ANY FURTHUR 

HALTS INDICATES AN ERROR HAS OCCURED. 

ENTER INPUT MODULE ADDR, IN SNITCH REGISTER PRESS 
CONTINUE, NEXT HALT SHOULD BE COMMAND MODE HALT. 

ENTER OUTPUT >«OOULE ADDRESS SWITCH 
REGISTER-PRESS CONTINUE. NEXT HALT SHOILD 
BE COMMAND MODE HALT. 

ENTER VECTOR ADDR. IN SWITCH REGISTER OF 
IST, GROUP OF INPUT MODULES-PRESS CONTINUE 
NEXT HALT SHOULD BE COMMAND MODE HALT, 

SAME AS ABOVE ONLY FOR 2ND GROUP 
OF INPUT MODULES, 

PRESS CONTINUE AGAIN. THIS IS USED TO 
DISCONNECT (FROM THE PROGRAM) ALL MODULES. CAN 
BE USED TO DISCONNECT ALL MODULES AND ONLY 
CONNECT 1 PAIR OF INPUT AND OUTPUT MODULES IF AN 
ERROR OCCURRED (DURING TEST) OR IF IT'S DESIRABLE 
TO RUN ONLY ONE PAIR OF MODULES. NEXT HALT 
SHOULD BE COMMAND MODE HALT, 

PRESS CONTINUE AGAIN, INDICATES TO 

PROGRAM THAT THE USER HAS CONNECTED THE 

INPUT AND OUTPUT MODULES IN THE FOLLOmING ORDERI 

15T INPUT TO 1ST OUTPUT MODULE 

2ND INPUT TO 2ND OUTPUT NODULE 



el 



IftO INPUT TO JDD OUTPUT MODULE 

4TH INPUT TO 4TH OUTPl'T MODULE 

AND DtSIPES TU TEST ALL 4 PAIHS AT OKL TI*«F, 

NtXl HALT SHOULD BC COMMAND MODE HALT 

16 PHLS5 COMTINUF THIS DIRECTIVL IS USKD TO SHOM 

HOW ONE PAIR OF MODULES ARE 
CONNECTED. IT BE USED TO SHO* UNUSAL 

CONNECTIONS OP SINGULAR CONNECTIONS FOR 
TEST i«HEN ONLY ONE PAIR CAN BE RUN AT ONE 
TIME. ENTER CONNECTION IN FOLLOWING 
MANNER! IN SDR BITS 0-2 ENTER BINARY OF 
NUMBER OF INPUT MODULE (NUMBERS RUN FROM \ TO 4 
FOR 1ST THROUGH 4TH INPUT MODULE)! IN S»«R BITS J-b 
ENTER BINARY OF NUMBER OF OUTPUT MODULE THAT 
IS CONNECTED TO INPUT MODULE (NUMBERS RUN FKOM 
5*8 FOR 1ST THROUGH 4TH OUTPUT MODULE), 
EXAMPLEl 1000001 WOULD SHOW 18T INPUT 
MODULE (001) iPkAS CONNECTED TO 4TH OUTPUT 
MODULE (1000). 

PRESS CONTINUE AFTER ENTERING CONNECTIONS 
IN SWITCH PLCISIER NEXT HALT SHOULD 
BE COMMAND MODE HALT, 



NOTLl DIRECTIVES CAN BE ENTERED IN ANY ORDER AND 
AT ANY TIME WHILE IN COMMAND MODE. 



9« OPERATING PROCEEDURE 



S.l OPERATIONAL St»XTCH SETTINGS 

........ 1 

I 

AFTER ENTERING NECESSARY INFORMATION AND STARTING TEST IN THE 

MANNER PRESCRIBED IN 4.b OR 4.6 THE FOLLOHING SWITCH REGISTER OPTIONS 

ARE AVAILABLE! 

9.1,3 SWITCH REGISTER FUNCTION 



SW1»«1 OR UP HALT ON ERROR 

SW14«1 OR UP LOOP ON TEST 

SWljBl OR UP INHIBIT PRINTOUT OF ERftOR 

SWllai OR UP INHIBIT ITERATIONS 

SWIO*! OR UP INHIBIT PRINTOUT OF "END PASS" 

NOTEl WHEN PROGRAM IS RUN WITH NO I/O TERMINAL (SA210} PROG()Ar« wILL 
HALT UPON DETECTION OF LrROR WHETHER OR NOT SRl^H. 



9,1.3 SCOPE LOOPS 



IF AN ERROR OCCURS AND THE USER WISHS TO SCOPE ERROR, HE 

SHOULD SET SW15«1 TO HALT ON ERROR, THEN WHEN PROGRAM HALTS 

ON ERROR, HE SHOULD SET SW15«0, SET SW14sl (LOOP ON CURRENT TEST), 

AND SWIJSI (TO INHIBIT PRINTOUT OF ERROR). 



5.2 



PPOCDAW ANO/OF OPERATOR ACTIO** 



THE FIRST PASS THROUGH THE TESTS ^ILL BE xADE tilTH ITERATIONS 

INHIBITED. SUCCESSIVE PASSES MILL ENABLE ITERATIONS IF Shrll>0, "END PASS" 

IS PRINTED AT END OF A PASS IF AM I/O TERMINAL EXISTS* IF ONt OOLS NOT 

THE OPERATOR Ckh EXAMINE LOCATION 1216 TO SEE HO* XANy PASSES 

HAVE BEEN COMPLETED. 

*C (CONTROL AkD LETTER C) MAY BE TYPED AT ANY lH't TO BRING PROGRAM 

RACK TO COMMAAD NODE IN ORDER TO CHANCE ANY PARAMETER, 

*R (CONTROL AND LETTER R } MAY BE TYPED AT ANY TIME TO GET 

A RUN SUMMARY CONSISTING OF NUMBER OF PASSES AND NUMBER 

Of ERRORS (IN OCTAL). 



*, ERRORS 
•••••• 

6,1 ERROR PRINTOUT ■> 



PRINTOUT VARIES WjIH THE ERROR DETECTED. THE ERROR PC TYPED OUT 
IS THE ACTUAL LOCATION UF THE ERROR CALL, IN THE DATA TEST 
ERROR TYPEOUTf'DATA EXP'D" IS THE COMPLIMENT OF THE DATA SENT. BUT 
IT REPRESENTS hHAT DATA THE INPUT MODULE SHOULD HAVE SENT TO 
PROCESSOR. 

A HALT AT LOCATION 7466 WHEN PUNNING hITH NO TERMINAL 
INDICATES AN ERPOf) HAS OCCURED, TO FIND OUT THE NUMBER 
OF THE ERROR* EXAC^INE LOCATION 1236. THIS IS THE ITE** 
NUMBER OF THE ERROR, TO FIND OUT WHAT THE ERROR TYPOUT 
MOULD HAVE BEEN GOTO TO THE ERROR POINTER TABLE BEGINNING 
AT LOCATION 1J06. 

6.1.1 EXAMPLE 



IF hE EXAMINED LOCATION 1236 AND FOUND A 5 (101) 

ME GO TO LOCATION 1306 AND LOOK THROUGH THE ERROR POINTER 

TARLE UNTIL ME FOUND ITEM 5, THE INFORMATION MOULD LOOK LIKEl 

I ITEM S FROM DUAL ADDRESS TEST 

EMS IDUAL ADDRESS ERROR 

DH3 lERROR ADDR ADDR ADDR 

IPC OUT IN DUAL 

DT3 llERRAD.tTMPOf SCDADRf fBDADR 

DFl to 

TO FIND OUT THE INFORMATION SPECIFIED BY DT3 ( lERRAO * STEMPO, IGDADR > tBDADR ) 

FOLLOW jtgESE 5TEPSI 

(1) LOOK UP THE ADDRESS OF THE LABLECI.E, tERRAD) IN THE SYHBOL TABLE (^HICH 
rOLLONS THE LISTING) 

(2) PUT THIS ADDRESS IN THE SWITCH REGISTER AND DEPRESS THE LOAD 
ADDRESS SWITCH ON THE PROCESSOR'S CONSOUL, 

(J) HOW DEPRESS THE EXAMINE SWITCH, 

(4) THE DATA DISPLAYED IN THE DATA LIGHTS IS THE INFORMATION 
THAT WOULD HAVE BEEN PRINTED FOR THIS LABLE IF YOU HAD A 
INPUT/OUTPUT TERMINAL, 



7, RtSTDICTIONS 

7,1 STAHTINC HESTftlCTjON 

ir THE VECTOP ADDRESS Or ANY I*IPUT VQDULE IS 200 09 2lO 
THE PROCHA>« MUST BE PLSTAPTED AT LOCATION 1000 

1.0 HI8CELLANL0US 

8.1 EXECUTION TIME 

O.S MIN, ITERATIONS INHIBITED 

5,0 HIN, WITH ITLRATIONS CrOP EACH CONNECTION) 

9,0 PPOCPAM DISCPIPTION 



THE TESTS APE DIVIDED INTO TMO PARTSI (1) TLSTS TO CHECK OUT 
ONE PAIR or CONNECTED MODULES! AND (2)* TESTS TO CHECKOUT ALL 
PAIRS or CONNECTED MODULES AT ONE TIME. 

PART ONE TAKES EACH PAIR Or CONNECTED MODULES THOUCTH THE rOLLOWiNC TESTSI 

(A) COUNT PATTERN (UP) 

(B) COUNT PATTERN (DOWN) 

(C) RANDOM DATA TEST 

(D) BYTE OPERATION TEST 

(E) INTERRUPT TEST-PROCESSOR AT PRIORITY ZERO 
(r) INTERRUPT TEST-PROCESSOR AT PRIORITY TOUR 
(C) INTERRUPT TEST-PROCESSOR AT PRIORITY riVE 

NOTEl THE riRST TMO INPUT MODULES' PRIORITY IS riVE, THLRErORE THEY SHOULD NOT INTERRUPT, 
THE SECOND TWO INPUT MODULES' PRIORITY IS 5IX-THEY SHOULD INTERRUPT. 

(H) INTERRUPT TEST-PROCESSOR AT PRIORITY SIX 

(I) INTERRUPT TEST-PROCESSOR AT PRIORITY SEVEN 
(J) INITIALIZATION TEST 



PART TtaO CHECKS ALL PAIRS Cr CONNECTED MODULES IN THE rOLLOoING TLSTSi 

(A) DUAL ADDRLSSINC TEST 

THE INPUT MODULE'S ADDRESS (IN A PAIR) IS SENT TO ITS' OUTPUT MODULE. 
AFTER DOING THIS FOR ALL CONNECTIONS, EACH INPUT MODULE IS READ. IE 
ANYTHING OTHER THAN ITS' ADDRESS IS READ FROM IT AN ERROR HAS OCCURED, 



(h) IMEBJ-UPT OPOiK TEST 



ALL INTEPPUm APL FIPST LOCKLD OUT, DATA IS SENT TO ALL OUTPUT 

MODULES IK THE CONNECTIONS. hOm INTEPRUPTS APE ENABLfcD AND TIME 

ALLOMED rOP INTEPHUPTS TO OCCUR. AS THLY OCCUPf A hUHBLP IS PLACED ON A 

STACK RL'PPCSENTINC THE ORDtP IN OHICH THE INTERRUPT TOOK PLACE. 

INPUT MODULE tJ SHOULD INTERRUPT BEFORE INPUT MODULE lit nHICH SHOULD 

INTERRUPT BEFORE INPUT MODULE ■! SHOULD INTERRUPT BEFORE INPUT MODULE 



LISTING 



NAXhDEC-ll*DZKHA-A »'ACV11,»24 2a*JAk«74 lOtOH 

DZKHA.SRC TABLL OF CONTENTS 



OPtRATIONAL SnITCH SETTINGS 

BASIC DtriNITIONS 

TRAP CATCHER 

STARTING ADORLSS(ES) 

TYPE ROUTINE 

COMMON TAGS 

ERROR POINTER TABLE 

TESTS 

HANDLERS 

END or PASS ROUTINE 

SCOPE HANDLER ROUTINE 

ERROR HANDLER ROUTINE 

ERROR MESSAGE TYPtOUT ROUTINE 

BINARY TO OCTAL (ASCII) AND TYPE 

RANDOM NUMBER CCNERATOR ROUTINE 

TRAP DECODER 

TRAP TABLE 

POIiER DONN AND UP ROUTINES 



MAIN0EC-11*0ZKHA«A 



1 




7 




3 




4 




» 








7 




• 


000001 


9 


000000 


10 




u 




12 




IJ 




14 




15 




16 




17 




11 




19 




20 




21 




22 




23 




24 


001100 


2S 




26 




27 


177776 


21 




29 


177570 


30 


177570 


31 




12 




33 


000000 


34 


000001 


IS 


000002 


16 


OOOOOi 


17 


000004 


38 


000005 


39 


000006 


40 


000007 


41 




42 




43 




44 




4& 


100000 


46 


040000 


47 


020000 


41 


010000 


49 


004000 


90 


002000 


SI 


001000 


52 


000400 


53 


000200 


94 


000100 



»'ACYll.b24 2ti-JAN«74 lOlOP PACt 1 



.TITLE MAlNDEC-n-DZKHA-A 
{•COPYRIGHT (C) 1973 
|*DISITAL EQUIPMENT COHP. 
|*MAYMAPD» MASS. 01794 
I* 

I •PROGRAM BY ED BAOGEP 

• TKal 

• SSbO 

.S6TTL OPERATIONAL Si»lTCH SETTINGS 

!• 

$• SWITCH USE 

!• ------ 

f 1» HALT ON ERROR 

I* 14 LOOP ON TEST 

t* 13 INHIBIT ERROR TYPLOUTS 

!• 11 INHIBIT ITERATIONS 

f* 10 INHIBIT PRINTOUT OF "END PASS" 

.SBTTL BASIC DEFINITIONS 

••INITIAL ADDRESS OF THL STACK POINTER ••• 1100 ••• 
STACKS 1100 

(EQUIV EMT, ERROR IBASIC DEFINITION OF ERROR CALL 

.EOUIV lOTfSCOPE IBASIC DEFINITION OF SCOPE CALL 

PSa 177776 IPROCESSOR STATUS WORD 

.CQUIV P5,PSW 

ShR* 177570 fSHITCH REGISTER 

DISPLAYaSMR 



ROM 


%0 


IGENERAL 


REGISTER 


Rl» 


%1 


(GENERAL 


REGISTER 


R2« 


%2 


IGENERAL 


RECISTLR 


Ri« 


%3 


IGENERAL 


REGISTER 


R4a 


%4 


IGENERAL 


REGISTER 


R5« 


%5 


IGENERAL 


REGISTER 


R6« 


%6 


IGENERAL 


RCGISTLR 


R7« 


%7 


IGENERAL 


REGISTER 


(EOUIV 


R6,SP 


ISTACK POINTER 


.EQUIV 


R7,PC 


fPROCRAM 


COUNTER 


{•"SWITCH REGISTER" 


SklTCH DEFINITIONS 




SI»15B 


100000 






Shl4« 


40000 






swii* 


20000 






Stal2« 


10000 






st*n» 


4000 






SH10« 


2000 






SN09* 


1000 






Sl«0*l» 


400 






SW07a 


200 






Sk06B 


100 







MAINDeC-tl»OZKHA«A HACyil.»34 38-JAN-74 lOlOt PACE 2 

OZKNA.SPC BASIC OCriNITIO<«S 



5» 000040 S»Oim 40 

96 000020 S*04« 20 

57 000010 Si>Oi« 10 

9f 000004 SH02* 4 

99 000002 SMOfB 2 

«0 000001 SHOOS 1 

61 .eoUlV SM09»SW9 

62 .LOUIV Si<OI»SI>8 
6) (COUIV SH01»8N7 
64 .CQUIV 8ti06f8W6 
69 ,EQUIV S«l09,Si<5 

66 .EOUXV 5H04«SH4 

67 .EQUIV SMOJfSH] 
61 .EQUIV S»l02fSH2 

69 , EQUIV SWOlfSWl 

70 .EQUIV SHOOfSHO 
71 

72 f*DATA BIT DEFINITIONS (BITOO TO BIT19) 

71 100000 BIT15« 100000 
74 040000 BIT14B 40000 
lb 030000 BITDb 20000 

76 010000 BITl2a 10000 

77 004000 BITllB 4000 

78 002000 BITlOa 2000 

79 001000 BIT09B 1000 
BO 000400 BITOi* 400 
SI 000200 BIT07a 200 
82 000100 BITOtB 100 
8] 000040 BITOSb 40 

84 000020 BIT04a 20 

85 000010 BIT09a 10 

86 000004 BIT02a 4 

87 700002 BXTOl" 2 

88 000001 BITOO> 1 

89 .EQUIV BIT09,BIT9 

90 .EQUIV BXTOItBITi 

91 .EQUIV BITOT, BIT7 

93 (EQUIV BIT0B«BIT6 
9J .EQUIV BXT0SrBIT9 

94 .EQUIV BIT04.BIT4 

95 .EOUXV BIT01,BIT1 

96 .EQUIV BIT02»BIT2 

97 .EQUIV BITOl.BITl 

98 .EQUIV BITOOfBXTO 
99 

100 |«BASIC "CPU" TRAP VECTOB ADDRESSES 

101 000004 ERRVEC* 4 ITIME OUT AND OTHER ERRORS 

102 000010 RESVECB 10 fRESERVEO AND ILLEGAL INSTRUCTIONS 
10] 000014 TBITVECal4 |"T" BIT 

104 000014 TRTVEC* 14 I TRACE TRAP 

109 000014 BPTVEC" 14 iBREAKPOINT TRAP (BPT) 

106 000020 lOTVECa 20 I INPUT/OUTPUT TRAP (lOT) ••SCOPE** 

107 000024 PtvRVEC" 24 IPOUEH FAIL 

108 OOOOJO EMTVEC" 30 fEMULATOR TRAP (EMT) ••LRROR** 



MAINDEC-li"OmMA-A MACY11.624 2B-JAN-74 iOlOB PACE J 

DZKHA.SRC BASIC DEriNITIONS 



109 

no 
in 

112 

Hi 

114 

11» 
11* 

117 

111 

119 
120 
121 
132 
13J 
134 
13) 
12* 
127 
121 
139 
110 
131 
1)2 

1J4 
135 
13* 
117 
138 
139 
140 
141 
142 
14J 
144 
14S 
146 
147 
14a 
149 
150 
151 
153 
153 
154 
155 
15ft 
157 
151 
159 
160 
Iftl 
162 



000200 
000210 
001000 



001100 
001102 
001104 
001105 
001106 
001107 

001110 
001114 
001116 
001120 



000034 



000000 



000200 

000137 005542 
000210 

000137 007200 
001000 

000137 005542 



001100 



177564 
177566 

000 

002 

012 

000 

105737 001107 
001402 
000000 
000407 



TPAPVEC«34 
.EOUIV CMT, 



I'TBAP" TUAP 



.SBTTL 



ERROR 

TRAP CATCHER 



• ■0 



(•ALL UNUSED LOCATIONS TROM 4 - 776 CONTIAN A ',*i,Hhlf 
(•StQUEhCE TO CATCH ILLLGAL TRAPS AND INTERRUPTS 
|*LOCATION 0 CONTAIhS 0 TO CATCH ZMPROPbRLY LOADED VECTORS 

.SBTTL STARTING ADDRESS(ES) 

,•200 



.•210 
.■1000 



JMP 



JMP 



»«8TAR 

NTH 
STAR 



lJUMP TO STARTING ADDRESS Or PROGRAM 
IGOTO NO TERMINAL HANDLER 
IRCSTART ADDRESS 1000 



.•1100 



.SBTTL 



TYPE ROUTINE 



{•ROUTINE TO TYPE ASCIZ MEBSACC, MESSAGE MUST TtRMINATE MITH A 0 BYTE. 
I*THE ROUTINE HILL INSERT A NUMBrP Of NULL CHARACTERS ArTER A LINE FEED. 
f*NOTElt SNULL CONTAINS TNE CNARACTCR TO BC USED AS THE I XLLCR CHARACTLR. 

(•N0TE2t SriLLS CONTAINB THE NUMBCR OT FILLCR CHARACTERS REQUIRED. 

|«N0TE3l triLLC CONTAINS THE CHARACTER TO FILL AFTER. 



(•CALL! 
1*1} USING A 
»• TYPE 
|«0R 
!• 
!• 



TRAP INSTRUCTION 
•MESAOR 



IMESADR IS FIRST ADDRESS UF AN ASCIZ FIRING 



TYPE 
MESADR 



1*2) USING A JSR INSTRUCTION 



!• 


MOV 


PS#«CSP) 


IPUSH PROCESSOR STATUS hORD ON THE STACK 


!• 


JSR 


PC.STYPE 


(CALL TYPE ROUTINE 


!• 


MESADDR 




1 FIRST ADRESS OF MESSAGE 


• TPSI 


177564 




ITTY PRINTER STATUS REG. ADORtSS 


• TPBt 


177566 




ITTY PRINTER BUIFER REG, ADORtSS 


•NULL! 


.BYTE 


0 


ICONTAINS NULL CHARACTER FOR FILLS 


•FILLSI 


.BYTE 


2 


ICQNTAXNS • OF FILLER CHARACTERS REOUIREO 


•FILbCI 


• BYTE 


12 


IFILL CHARS. AFTER A "LINE FEED* 


•TPFbCl 


.BYTE 


0 


1 "TERMINAL AVAILABLE" FLAG (OvYES) 


•TYPEI 


TSTB 


•TPFLC 


IIS THERE A TERMINAL? 




BEQ 


IS 


IBR IF YES 




HALT 




(HALT HERE IF NO TERMINAL 




BR 


31 


1 LEAVE 



DZKMA.SPC 



•'ACYn.b74 2««JA«<-74 lOiOe PAGt 4 
TYPt MOJTIVf 



1 D J 


\J*i I I d € 


U 1 V 1/ ^ V 




111 




P0( «(&P) 






a 1 7iinfl 


OOflOO J 




*<ov 


a2(SP) • PO 




no 1110 


J A * w ^ w 




26t 


T • »• 


( PO ] « • • ( S(' ) 


t vv 




VV » V V J 






BNC 


41 


1 

i O ' 


00 1 1 J4 


00)726 






T5T 


(SP) ♦ 


1 A ft 


00 1 1 16 


fl 1 }(iOO 






f C V 


( SP ) « » PO 


1 A4 
ITT 


001140 


All? 7 1 6 


W V V V A 


3C 1 


ADD 


*2> (SP) 




001144 


000002 

V W V V V A 






PTl 






001 146 


0047 J7 


W • w V V 


4SI 


JSP 


PC» 7» 


fl 73 






001 10b 


511 


CIPB 


tFILLCf (SP)* 


1 7i 




001 J64 






BNE 


21 


174 


001 160 


01 1746 


001 104 




MOV 


INULLf -(SP} 
















17» 


001164 


10S366 


000001 


6tl 


DtCh 


l(SP) 


177 


001170 


002770 






BLT 




17» 


001172 


0047 37 


001200 




JSP 


PC»7I 


179 


001176 


000772 






BH 


61 


110 


001200 


105777 


177674 


761 


TSTB 


9STPS 


111 


001204 


100J75 






BPL 


71 


112 


00120b 


116677 


000002 


17766b 


MOVB 


2(SP}>94TPB 


113 


001314 


000207 






RTS 


PC 



iSAVt HO 

IGIT ADDPLSS ur ASCIZ SIPINC. 

It'USH CHAPACTtP TO bE TlTPtO OnTJ STAC* 

IBP It IT ISN'T THE TtH»<lNATOK 

I IF TEPVlhATOP POP IT 0» F THE STACK 

iWESTOPt hO 

(ADJUST PETUPN PC 

IPETUWN 

rGO TYPl THIS CHAPACTtP 

rIS IT TIKE FOP FILLEP CKAPS,7 

I IF NO CO CLT NfcXT CHAP, 

»CET • or rXLLEP CHAPS. NLEOED 

lANO THt NULL CHAP. 

I DOES A NULL NCLD TO BE TYPLD? 

IBP IF NO»«GO POP THE NULL OTt OF STACK 

iCiO TYPE A NULL 

ILOOP 

|»AIT UNTIL PKINTEP IS PEAOY 

ILOAD CHAP 10 BL TYPED INTO DATA PCS. 



MAINDCC-1 t-DZKHA«A 
DZKHA.SOC 



MACYM«624 2fi«JA»i*74 lOlOB PACE ft 
TYPE POUTINE 



t M A 






1 flik 

I ■a 






t ft & 






It' 






lift 






• DO 






1 »0 






1 Q 1 




U w U V V w 


1 O 0 


nn 1 9 9 n 
V w i « ^ u 


Ann 
w u u 


1 O 1 




000 


\9A 

1? 


0013 27 


000000 

w V w w W 


1 »3 


ont 771 


oonoon 


1 Oik 


no 1 22a 


000000 
vw w w w w 


197 


001 230 


000000 


1 » • 


001212 


ooooon 




00 1 71A 


000 


200 


0012J7 


000 


• V A 


001 240 


000000 

V W W W W w 


702 

< V c 


001242 


000000 


201 


001244 


000000 


204 


001 246 


000000 

V V V V V V 


20S 


001 250 


000000 


206 


001292 


000000 


207 






308 


001 2S4 


000000 

W V V W V w 




001 2S6 

VV 4 # 0 V 


000000 


210 


001260 


000000 




001262 


000000 


312 


OOl 364 


000000 


21 ] 


001266 


000000 


214 


001270 


000000 


215 


001272 


000000 


216 


001274 


000000 


217 


001276 


000000 


21S 


OOlJOO 


000000 


219 


001302 


077 


220 


001303 


015 


221 


001304 


000012 



(SBTTL CQi'ilON TAGS 

t*THIS 1ABLC CONTAINS VAPIOUS COMMO 
t*USED IN THE PR0CRA*4, 



IPASSI 




0 


STSTNMI 


.BYTE 


0 


•EPFLCt 


.BYTE 


0 


SICNTI 


.WORD 


0 


•LPADPI 


.WORD 


0 


•LPERDI 


,MORD 


0 


•LHTTLI 


.MORD 


0 




.WORD 


0.0 


•ITENBl 


.BYTE 


0 




• BYTE 


0 


■EPRADI 


.WORD 


0 


•CDADPI 


.WORD 


0 


•BDADPl 


.WORD 


0 


ICDDATI 


.WORD 


0 


IBODATI 


.WORD 


0 


•PCCAOl 


.WORD 


0 


•RCCOl 


.WORD 


0 


•PCCll 


.WORD 


0 


•PCC2I 


.WORD 


0 


•pec3i 


.WORD 


0 


•RCC4i 


(WORD 


0 


•PECSl 


.WORD 


0 


•TMPOi 


.WORD 


0 


•TMPll 


.WORD 


0 


irMP2i 


.WORD 


0 


•THP3I 


.WORD 


0 


•TIMES! 


0 




•OUESI 


.ASCII 


/?/ 


•CRLPI 


.ASCII 


<15> 


tLFl 


,A8CIZ 


<ia> 



STORAGE LOCATIONS 



CONTAINS PASS COUNT 
CONTAINS THE TLST NUMBER 
CONTAINS ERROR FLAG 
CONTAINS SUBTEST ITERATION COUNT 
CONTAINS SCOPE LOOP ADDRESS 
CONTAINS SCOPE RETURN FOR ERRORS 
CONTAINS TOTAL ERRORS OCTCCTtD 
RESERVED»«NOT TO BE USED 
CONTAINS ITEM CONTROL BYTE 
RESERVLD*«NOT TO BL USED 
CONTAINS PC or LAST ERROR INSTRUCTION 
CONTAINS ADDRESS OF 'GOOD' DATA 
CONTAINS ADDRESS OF 'BAD' DATA 
CONTAINS 'GOOD' DATA 
CONTAINS 'BAD' DATA 
CONTAINS THE ADDRESS FROM 
WHICH (SREGO) MAS OBTAINCO 
iCONTAINt ((SilC6AD}«0) 
iCONTAXliS ((SllCGAD)*a) 
iCONTAmS ((SilCGAD)*4) 
ICONTAIRS ((SRCCAD)«») 
tCONTAINS ((SPE6AD}«10) 
tCONTAIMB ((flRCCAD}*12) 
I USER DEFINED 
I USER DtFINbD 
tUSER DEFINED 
I USER DEFINED 

)MAX, NUMBER OF ITERATIONS 
IQUESTXON NARK 
rCARMIACC RETURN 
aiNE FLED 



MAINDCC-ll-DZKHJI-A MACyi>*b24 2il«JAN-74 lOlOB PACE h 

OZKHA.SRC COHMOh TAGS 



332 

23J 

224 

23& 

236 

227 

^21 

239 

2J0 

331 

2J2 

2Ji 

214 

2JS 

2J6 

237 

231 

239 

240 

241 

342 

343 

344 

345 

34* 

347 

341 

349 

250 

3S1 

2S2 

353 

354 

355 

356 

357 

358 

259 

360 

361 

363 

363 

364 

365 

366 

367 

368 

269 

270 

371 

373 

373 

374 

275 



.SBTTL 



EfmoR poxNTtR tab:.e 



001306 



001306 
001310 

001313 
001314 



001316 
001330 

001333 
001334 



001336 
001330 

001333 
001334 



001336 
001340 

001343 
031344 



007606 
010476 

007534 
000000 



007640 
010611 

007540 

000000 



007703 
010611 

007540 
000000 



007760 
010476 

007524 
000000 



|*THIS TABLE CONTAINS THE INrORMATION rOP EACH LPHOH THAT CAN OCCUR. 

I*THE INFORMATION IS OBTAINED BY USING THE INDEX NUMBER FOUND IN 

{•LOCATION SITEMB. THIS NUMBER INDICATES mHICH ITEM IN THE lABLt IS PLRTIhC^iT. 

|*NOTEll IF tITEMB IS 0 THE ONLV PERTINENT DATA IS (tCRRAD). 

l«N0TE2l EACH ITEM IN THE TABLE CONTAINS 4 PUINTERS EXPLAINED AS FULLO«Sl 



»• 

»• 



8ERRTBI 



I ITEM 1 

EMI 
DHl 

DTI 
DFl 

lITtM 2 

EM3 
DH3 

DT2 
DFl 

lITtM 3 

EM3 

DH2 

DT3 
DFl 

IZTLM 4 

EM4 

DHl 

DTI 
DFl 

I ITEM 5 



EM 
DH 
DT 
OF 



tPOINTS TO THE ERROR MESSACL 

IPOINTS TO THE DATA HEADER 

(POINTS TO THE DATA 

tPOINTS TO THE DATA FORMAT 



lERROR-TABLL 



FROM DATA TEST 

ISND-RECXCVE DATA ERROR 

lERROR ADDR ADDP DATA DATA 

IPC OUT IN EXP'D IN 

||EHRAD« fCDADR, (BDADR, SCDDAT« SBDDAT 

10 

FROH INTERRUPT TEST 

I INPUT HODULE FAILED TO INTLRHUPT 
I ERROR ADDR ADDR PROS 
IPC OUT IN STAT 

|8CRRAD> aCDADRi SBDADR* ITMPO 
10 

I INPUT MODULE INTERRUPT AT teRQNC PRIORITY 

I I INPUT MODULE INTERRUPTED AT hRONC PRIORITY 

lERROR ADDR ADDR PROS 

IPC OUT IN STAT 

IIERRAD* 8CDADR* SBD*DR» ITHPO 

10 

FROM INIT TEST 
IRCSET FAILED TO INITIALIZE INPUT MODULE 



lERROR ADDR ADDR 
IPC OUT IN 

I8ERRAD, tCDADRf 

to 

FROM DUAL ADDRESS TEST 



DATA DATA 
EXP'D IN 

8BDADR> •GDOAT* SBDDAI 



MAINOCC-n»OZKHA-A NACyU.624 2t)-JAN-74 IOIO8 PACt: 7 

DZKHA.SRC CRROH POINTER TABLE 



001J46 010041 EMS 

001J50 010706 DH3 

001J92 0075&2 DT3 

ooiJ»4 000000 on 



IXTEM 6 EKXTR2 



184 OOnSb 010066 EM6 



001360 011003 DH4 

001362 007ft64 DT4 

001364 000000 DFl 

tITEM 7 LRCSR 

001366 010171 EH7 

001J70 011102 0H5 

001172 007600 DT5 

001J74 000000 DFl 

tITE>* 10 

00137b 010247 EKll 

001400 011137 Dh7 

109 001402 000000 DT6 

106 001404 000000 DFl 
101 

101 tITEM 11 
lOf 

001406 010275 El'12 

001410 011137 0H7 

001412 000000 DT6 

U 001414 000000 OFl 

[v tllfi 12 

001416 010J35 EHll 

001420 011137 0H7 

001422 000000 DT6 

001424 000000 DFl 

IXTLM 13 

001436 010376 EK14 

001430 011137 DH7 

001432 000000 0T6 

001434 000000 DFl 



IDUAL ADDHE&S IfmoU 

tCRHOP ADDP ACDP ADDH 

IPC OUT IN DUAL 

KEHPADf tTHPO* ICDADP* aBOATH 

to 

PROM INTERRUPT OHDEP TLST 
I INTERRUPTS OUT OF ORDER 

ISHQULD BEt INTER3>INTER4>It.TtRl>INTER2 
tir ADDRaO THAN NOT UKDtR TLST 
tERROR INTERl XNTER2 INTtPJ INTLP4 
IPC ADDH ADOR ADOH ADDP 

||ERRAD» tRECOf tRECl. •REG2> •REC3 



lFRO»t CSR INT TEST 

I INT FAILED TO CLEAR INTR. LNABLE BIT 
lADDR 9H0MS INPUT MODULE THAT INTERRUPTED 
lERROR ADDR 
IPC IhTR 
IIERRAD tTMPO 

to 

CONTROL TEST MONITOR EPROR 

INO CONHECTIONS MADE 
IPROCRAM NOT RUNNXNC 

to 
to 

CONTROL TEST MONITOR ERROR 

INO INPUT MODULE ADDR ENTLRtD 

IPROGRAM NOT RUNNING 

10 

to 

CONTROL TEST MONITOR ERROR 

INO OUTPUT MODULE ADOR ENTERED 

IPROGRAM NOT RUNNING 

10 

to 

CONTROL TEST •MONITOR ERROR 

tVECTOR ADDR NOT ENTERED FOR SELECTbD CONNECTION 

IPROGRAM NOT RUNNING 

10 

to 



MAINDEC-n-DZKHA-A 
OZKHA.SPC 

330 
331 

3J2 001436 011176 

)33 001440 011S36 

334 001442 000000 

J39 001444 000000 
336 



HACyil«634 2i(-JAN*74 10l08 PACE b 
EPdOP PUIMtP TABLE 

IXTI" 
MCRLF 

on 



CCNTPOL TLST HONXTOK tAlLUPt 

ICAPPACL METUHN LINt tttO 

IMKONC XNPUT-RETYP IT SU THAT OPtHATOM 

I 0 CAN SEE HIS MISTAKt 

I 0 



MAINDeC-ll>OZKHA-A 
DZKHA.SRC 



HACYn,b24 3h-JAN>74 lOlOb PACE 9 
TESTS 



3J7 








.5BTTL 




TESTS 


JJI 












1 START 


3J9 


001446 


012706 


001100 


STARTS 


MOV 


•1100. 


J40 


001452 


012701 


004370 




HOV 


•H005C 


141 


001456 


005721 




141 


TST 


(1)« 


342 


001460 


001006 






BNE 


STARTl 


343 


0014*2 


020127 


004100 




CMP 


Pit 


344 


001466 


001373 






BNE 


11 


345 














346 














347 


001470 


104010 






ERROR 


10 


341 














349 


001472 


000137 


005543 




JMP 


STAR 


350 


001476 


005737 


004340 


STAHTlt 


TST 


MODlA 


351 


001502 


001003 






BNE 


START2 


352 














353 


001504 


10401 1 






ERROR 


11 


354 














355 


001506 


000137 


005542 




JNP 


STAR 


356 














357 


001512 


005737 


004250 


STAHT2I 


TST 


•40D5A 


351 


001516 


001003 






BNE 


STARTl 


359 














360 


001520 


104012 






ERROR 


12 


361 














362 


001522 


000117 


005-.42 




JMP 


STAR 


363 














364 


001526 


005717 


004260 


STADTll 


TST 


MOO IV 


365 


001512 


001006 






BNE 


START4 


366 


001514 


005717 


004270 




TST 


N005C 


367 


001540 


001403 






BEQ 


STAPT4 


361 


001542 


104013 






CRROP 


13 


369 


001544 


000137 


005542 




JNP 


STAR 


170 


001550 


005737 


004264 


STA|tT4l 


TST 


M0D3V 


371 


001554 


001006 






BNE 


START5 


372 


001556 


005737 


004274 




TST 


M0D7C 


37J 


001562 


001403 






BEQ 


STARTS 


374 


001564 


104011 






EPPOP 


13 


375 


0015*6 


000117 


005542 




JMP 


STAR 


176 














377 


001572 


005017 


004330 


START5I 


CLP 


criG 


371 


001576 


005717 


001216 




TST 


IPASS 


J79 


001602 


001005 






BNE 


It 


310 


001604 


105737 


001107 




TSTB 


iTPrtc 


311 


001610 


001003 






BNE 


li 


312 


001612 


104400 






TYPE 




313 


001614 


011406 






HKUN 




JI4 


001616 


012703 


004260 


Itl 


MOV 


•MOOIV 


3IS 


001622 


012705 


004270 




MOV 


•MODSC 


316 


001626 


012704 


004250 




MOV 


•MODSA 



317 
311 

319 

190 



C FOR SUbTLSTS 
fSET UP SK 



iStE ir ANY CONNECTIONS 



|N0 CONNECTIONS MADt 
imE CAN'T START-LtT HIM (CN0» 
IMESSAGE "NO CONNECTIONS |MACE" 
I'PMOCRAH NOT PUNNINC* 

ISEE IF ME HAVE INPUT MODULL ADDRS, 
ICAN'T START ir Wt DON'T 

(NO INPUT MODULL ADORS 
IPROCRAM NOT RUNNING 



iSEt IF OUTPUT MODULE ADDR. 
tHAS BEtN ENTERED 

I MESSAGE "NO OUTPUT MODULE ADDRS 
lENTERED" 

{"PROGRAM NOT RUNNING* 



ISEE IF ME HAVE VICTORS ENTERED 

|N0 VECTOR ENTERED! BUT MIGHT NOT BE 
ICONNECTCD 

fNESSAGE "NO VECTOR ADDRESS ENTERED" 

lis VECTOR ENTERED 

IFOR SECOND CROUP 

I IF NOTi SEE IF CONNECTED 

IIS CONNECTED, BUT NOT VECTOR ENTERED 



lALL NECESSARY INFORMATION HAS BEEN ENTERED 
IREADY TO CO, SEE IF WE TYPE 
IMESIAGC RUNNING-ONLY ONE FIRST 
IPASS AND ONLY IF NE HAVE A TERMINAL 



IINITIALIZATION OF CONNECTIONS 
lAND VECTORS FOR START 



MAINDCC-ll-DZKHA-A 
DZKHA.SPC 



>'ACYll.b24 2e-JAN«T4 lOtOH PACE 10 
TESTS 



J91 














392 














J9J 














194 














}9S 














J96 


001632 


020527 


004300 




SXNbLCI 


CMP 


197 


001636 


001417 








BEG 


>99 


001640 


012437 


001242 






MOV 


199 


001644 


013537 


001244 






MOV 


400 


001650 


001770 








BCQ 


401 


001652 


013700 


001^44 






MOV 


402 


001656 


042700 


177770 






BIC 


40J 


001662 


062700 


004260 






ADO 


404 


001666 


011037 


004300 






MOV 


405 


001672 


000137 


001702 






JMP 


406 


001676 


0001J7 


003064 




SINCLFt 


JMP 


407 














408 














409 














410 














411 














412 












« 


41J 


001702 


005037 


004500 




OATASCI 


CLP 


414 


001706 


012737 


001706 


001224 


Itl 


MOV 


41& 


001714 


013737 


004500 


001246 




MOV 


416 


001722 


013777 


001246 


177312 




MOV 


417 


001710 


017717 


177110 


0012S0 




NOV 


411 


001716 


00S117 


001246 






COM 


419 


001742 


023717 


001246 


001250 




CMP 


420 


001750 


001401 








BCO 


421 


001752 


104001 








ERROP 1 


422 














423 


001754 


000004 








SCOPE 


424 


001756 


005217 


004500 






INC 


43S 


001762 


001351 








BNE 


426 














427 














42t 














429 














430 














431 














432 


001764 


012737 


001772 


001224 


DATAl 1 


MOV 


433 


001772 


013737 


004500 


001246 


111 


MOV 


434 


002000 


013777 


001246 


177234 




MOV 


435 


002006 


017737 


177232 


001250 




MOV 


436 


002014 


005137 


001246 






COM 


437 


002020 


023737 


001246 


001250 




CMP 


431 


002026 


001401 








BEQ 


419 














440 


002030 


104001 








ERPOF 1 


441 


002032 


000004 








SCOPE 


442 


002034 


005337 


004500 






DEC 


443 


002040 


001351 








BNE 


444 















ITHIS HANDLER MILL FORM TLST ADDRlSStS 
lANO SEND PROCRAM TO ALL SINGLE LINE TESTS 
(UNTIL ALL CONNECTIONS HAVE BEEN TESTED 

R5» •M0DIC«2 iDONE ALL C0NNECTI0N8T 

SINCLr fir YESfCOTO DUAL ADDR TESTING 

(4]*( ICDAOK iCET OUTPUT MODULE ADDR 

9(5)«» IBDADR fCET INPUT MODULE ADDR 

SINGLE lir NO CONNECTION THEN GET NE» ADUR, 

• BDADRfRO |NOW GET VECTOR ADD»*tSS t 

•177770iRC irORM OFFSET 

■HODlVfRO (USE OFFSET TO GET VECTOR 

(0}|VECTOR ISTORE VECTOR 

DATASC ICOTO TO DATA TESTS 

DUALl iCOTO DUAL TESTS 



IDATA TESTS 

IPART II COUNT PATTERN 
I •••••••••••••••••• 



(UP) 



NINP 

•1I.6LPADR 

NINP, ICDDAT ICET DATA TO SEND TO OUTPUT NODULt 
•CDDAT#9ICDA0R iSEND DATA TO OUT PUT MODULE 
ftBDADRf tBDDAT IGET DATA FROM INPUT MODULE 



•CDDAT 

•CDDAT* 

.♦4 



NIrtP 
II 



IBDDAT 



lEXP'D ■ COMPLItMT OF SbNT DATA 
IDATA SENT • DATA RLCIEVE07 



IDATA SENT 
IITCDATL 



NOT EQUAL TO DATA RECICVCD 



ICOUT UP FULL 



IDATA TESTS 

IPART 21 COUNT PATTERN (DOilN) 



•llf ILPADR 
NINPi IGDDAT 



ICET PATTERN 
.IGDDAT, BICDADR ISEND DATA TO OUTPUT MODULE 
BIBDADRflBDDAT iCET DATA FROM INPUT MODULE 
ICDOAT |t.XP*D DATA ■ COMPLIEMT OF DATA SbNT 

IGDDAT, IBDDAT iDATA EXP'D « DATA HECIEVED 7 
,♦4 I IF YES GET NEm DATA MORD 



NINP 
DATAl 



IDATA EXP'D NOT EQUAL TO DATA RLCICVED 
ICOUNT DOntI FULL 



MAtNOCC-n-DZKHA-A 
DZKHA.SNC 



NACYU.t>24 28-JAh-74 lOtOI PACt M 
TLSTS 



* ^ 3 




























A A Y 














AAA 
^ * ■ 














< * » 














490 

V 9 V 




























V 7 A 


002042 


0137)7 


003090 

V V • V ^ V 


001224 


DATAP I 


MOV 


49 1 


002010 


0047)7 


006664 






JSR 


494 

^ * ^ 


002094 


01)7)7 


00701i 


001 246 




MOV 




002062 


01)777 


001246 


177192 




MOV 


4S6 


002070 


0177)7 


177190 


001290 




•40V 


497 


002076 


00S1)7 


001246 






COM 


^ * • 


002102 


0217)7 


001246 


001290 




CMP 


499 


0021 1 0 


001 401 








BLO 


460 


002113 


104001 








CDDOP 


461 














462 














46) 














464 














465 














466 














467 


0021 14 


000004 






DATAOl 


SCOPE 


461 


0021 16 


009077 


177120 






CLI> 


469 


002122 


0127)7 


177400 


001 346 




MOV 


470 


0021 10 


112777 


177777 


177104 




MOVB 


471 


002136 


0177)7 


177102 


001290 




MOV 


472 














47) 


002144 


1097)7 


001290 






T8TB 


474 


002190 


001401 








BEQ 


479 


002192 


104001 








EPPOP 


476 


002194 


0091)7 


001246 






COM 


477 


002160 


01)700 


001242 






MOV 


471 


002164 


112760 


177777 


000001 




MOVB 


479 


002172 


0177)7 


177046 


001290 




MOV 


410 














411 


002200 


1097)7 


001291 






T5TB 


482 


002204 


001401 








SCO 


41) 


002206 


104001 








CPROP 


414 














419 














4>6 














417 














411 














419 














490 


002210 


000004 








SCOPE 


491 


002212 


0127)7 


0022)0 


001224 




MOV 


492 


002220 


000009 








RESET 


49) 


002222 


092777 


000100 


001470 




BIS 


494 


0022J0 


000004 






8XNTI 


SCOPE 


499 


0022)2 


0127)7 


000)40 


177776 




HOV 


496 


002240 


012777 


002)10 


0020)2 




MOV 


497 


002246 


01)777 


0090)4 


001764 




MOV 


491 


0022S4 


012777 


000001 


176760 




MOV 



IDATA TESTS 

tPART 31 RANDOM NUMBER TEST 



•llrSLPADR 

PC* IRANO ICET A RANDOM NUMBER 

tLONUM, ICDDAT tPUT RANDOM NO. IN CDDA1 

•GOOATi BICDADR ISEND PANDOH NO, TO OUTPUT NODULE 

OIBDADP* tBDOAT |CET DATA PROM INPUT MODULE 

ICOOAT 

•GDDAT* IBDDAT |DATA SENT ■ DATA RtCEXVEDT 
.♦4 



IDATA SENT NOT LOUAL TO DATA RECILVLD 



(BYTE OPERATION TEST 



OlCOi OR 
•177400 

• -1» 
BIBDADR 

•BOOAT 
.♦4 

•CDDAT 
ICDADR. 

• -1* 
BiBDAOR 

•BDOAT* 
.♦4 



fIGODAT (SET UP TO TEST POR LOM BYTt OPERATION 

96GDADR iSEND ALL ONES TO OUTPUT NODULE BUT 
• IBDDAT lEXPECT ONLY LOW BYTE TU GET THROUGH 

IJUSTXPY DATA 

ITEST POR ZEROS LOW BYTE 

IPAILED TO DUE A LOti bYTE OPERATION 
ISCT UP TO TEST HIGH BYTE OPERATION 



RO 

1(0) ISEND ONES TO HIGH BYTE 
, IBDOAT lEXPCCT ZERO'S BACK IN LOh BYTE 

iJUSTirY DATA 
1 iTEST FOR ZEROS IN HIGH BYTE 

IFAILED TO DUE A HIGH BYTE OPbPATlON 



ITHIS ROUTINE MARE SURE THE INPUT MODULES aHILL 
I INTERRUPT* AND TO THE RIGHT VECTOR 
!••••••••«••••••• 



•SINTiSLPADR 
•lOOiflTKS 



UNITIALIZE ALL HOOULbS 



1340* PSH ILOCK OUT INTERRUPTS 

■SXNTR* BVECTOR |SET UP INTERUPT RETURN 

S17« BMOOIA lENABLE INPUT MODULE TO INTERRUPT 

•If IIGDADR ISEND DATA TO OUTPUT MODULE 



MA 

02 



DEC-n«OZKHA-A 
A.SPC 



*<ACyil.b24 3H-JAN-74 lOlOB PAGL 12 

TESTS 



99 
00 
01 
03 
OJ 
04 
09 
Ofe 
07 
01 
09 
0 
1 
2 
J 
4 
5 
6 
7 
I 
9 
0 
1 
2 
J 
4 
5 
6 
7 
• 
9 
0 
1 
3 
3 
« 
9 
6 
7 
I 
9 
0 
1 
2 
} 
4 
9 
6 
7 
• 
9 
0 
1 
7 



003263 
003366 
003270 
003272 
00237.1 
002J03 

003304 
002310 
002312 



003412 
002414 
002420 
00242* 
002430 
002436 
002440 



0090J7 
009000 
009200 
001 J76 
013737 
104002 

000137 
032636 
017737 



17777fc 

17777* 001370 
003230 



CLP PS* 

CLP PO 

IhC PO 

BSE .-3 

NOV PSWf tTMPO 

CPROP 3 



JMP Slhl 
SINTRl P0PSP3 
176726 001270 PtOV ••BOADPi 



lALLO* ISTtPPUPTS 

imait hlpl ron intchpupi 



(INPUT MODULE FAILED TO INTLPPL'PT AT 
IPPOCES&OP PPIOPITY ZLPO 

IPETUPN SP 
• TMPC 



(MAKE SUPE INPUT MODULE rfILL INTEPPUPT 
IPPOCISSOP PPIOPITY AT LEVEL 4 
I •••••••••••••••• 



• ITH 



002330 


000004 






SINT4I 


SCOPE 








003333 


013737 


000340 


17777b 




MOV 


■ 340> 


P5M 


ILOCK OUT INTEPPUPTS 


003330 


012777 


003402 


001742 




MOV 


•SINT4P 


, BVECTOP 


fSET UP INTCPPUPT PETUPN 


0033S6 


013777 


009034 


001674 




MOV 


517, 


9M001A 


lENABLC INPUT MOOULLS TO INTP, 


002344 


013777 


000001 


176670 




MOV 


• I, 


BICOAOP 


ISENO DATA TO OUTPUT MODULE 


002393 


013737 


000200 


177776 




MOV 


■ 300» 


PSM 


>SET PPIOPITY TO LEVAL »OUR 


003360 


005000 








CLP 


PO 






003363 


009300 








INC 


PO 




itiAZT HEPE POP INTEHPUPT 


002J64 


001376 








BNE 


.-2 






002166 


012737 


000200 


001370 




MOV 


• 200f 


flMPO 




002374 


104002 








CRPOP 2 






1 INPUT MODULE FAILED TO INTLPPUPT 


















iPRoccssop PPIOPITY roup 


002376 


000137 


002412 






JNP 


SINT5 






002403 


033636 






SINT4PI 


P0PSP3 






IPESCT SP 


003404 


017717 


176634 


001370 




MOV 


••BDAOR 




• TMPO 



tPHJOPITY LEVEL FIVE INTEPPUPT TEST 

fNOTC THAT SOME INPUT MODULES SHOULD INTP 

lAT PP0CC5$0P PPIOPITY FXVC AND OTHERS SMOULON'T 

liST TWO INPUT MODULES ARC AT LtVCl riVC AND SHOULDN'T INTR. 

I3N0 TWO INPUT NODULES ARC AT LCVCL SIX AND SHOULD INTR 



000004 
00S037 
023T17 
001406 
033737 
001403 
009137 



SINTSI 



004302 
004340 

004242 

004303 



001344 
001344 



SCOPE 

CLR 

CMP 

BEQ 

CMP 

BCO 

COM 



SFIVC 

MODlAf 

It 

M0D2A» 
It 

SFIVC 



SBDADP 
IBDADR 



IDETEPMINE IP CUPHENT INPUT 
I MODULE SHOULD INTR. 



I3ND CROUP or INPUT MODULES 



■..! 



HAZN0CC-11*0ZKHA«A 
DZKHA.SRC . , . ^ 



""HACYn.624 28-JAh-74 -lOlOB , PACE H 
.TESTS 



553 


002444 


012737 


000240 


001270. 


111 ' ^ 


NOV * 


• 240i 


554 


002452 


012737 


000340 


177776 




' HOV 


• J40* 


555 


'002460< 


012777 


002532 


001612 " 




MOV ' 


■sint&r» 


55b, 


002466 


013777 


005034 


001544 


• 


"MOV 


517, 


557 


002474 


012777 


000001 


176540 




'MOV - 




558 


002502 


012737 


000240 


177776. 


• 


'MOV 


• 240* 


559' 


002510 


005000 




^ \ 




CLP- 


PO 


560 


002512' 


.005200 




J 




INC 


PO 


56r 


002514 


001376 








BNC 


.-2 


563 ' 


002516 


. 005737 


004302 






:t5t 


srxvE 


56J 


002522 


001413 








BCQ 


SXNT6 


564 


002524 


104002 








ERROR 2 




565 












JHP 


8XNT6 


566 


002526 


000137, 


002552 






567 












P0PSP2 




'568 


002532 


022626 






SXNT5RI 


»tBOADR# 


569 


002534 


017737 


176504 


001270 




MOV 


570 


002542 


005737 


004302 






tst 


srivc 


571 


002546 


001001 








BNE 


SZMT6 


572 


002550 


104003 








ERROR 1 





STMPO 

psH : 



ILOCK OUT INTERRUPTS 



573 
574 

575 
576 

.577 
57B 
579 
580 
581 
582 
583 
584 
585 
586 
587 
588 
589, 

'590 
591 
592 



VMOUIA . fCNABLC INPUT MODUtLS TU INTERRUPT 
8IC0A0P ISEND DATA TO OUTPUT MODULE • 
P5M ISCT PROCESSOR PPIOHITY TO LEVEL FIVE 

IhAIT HERE POP AN XNTERHUPT 



fNO INTERRUPT OCCURED • SHOULD nE 
fHAVE ONE? 

|TE3# INPUT MODULE AT LEVEL SIX 

ISHOULD HAVE ZNTF. hlTH PROCESSOR 

IPRZORZTY AT LEVEL b 

f INTERRUPTED • BUT SHOULD W£ HAVE? 
ITMPO 



INO • 8INPUT MODULE (PRIORITY 5) SHOULD NOT 
IHAVE INTERRUPTED NITH PROCESSOR 
IPRIORZTY AT LEVEL 5 



000340 J 177776 
000300 ' 001270 
001502 
001434 
176430 
,177776 



/ ; - *\< ; ; - 

'002552 ^000004 
002554 012737 

002562' ,012737 
002570 10127774^002310 
002576 ^013777*^ , 005034 
002604^ ,012777; 000001 
002612 , . 013737 001270 
i002620>,005000 ; 
; 002622 -005200 , ' 
593' 002624 '. 100376 . 

594 ^ .» - f. .J <v * 

595 ' 002626-^000137 , 002644 

-596 :\ • * V,'.' ^ '^''k 

597 .002632 I 022626-:' . \ 

598 ^002634 /017737 ;.?J76404 

599 ' 002642 104003, t 

'600 . v^.- 

601',*'^ I'^t'- j^'s : 
602 '^'C t - 'K 

603- ' -.^ - 

604 
60S 
606 



8XNT6I 



SCOPE 

MOV ' 
'MOV 
HOV 
MOV 
HOV ' 
MOV 
CLR 
XNC ^ 
BPL 



IPRXORTY LEVEL 6 INTERUPT TEST 
|N0 INPUT MODULES SHOULD INTERRUPT 
filSTM PROCESSOR AT THIS LEVEL 



iLOCK OUT INTERRUPTS 



001270^ 



•340* PSW 

•300* ITHPO 

•SINTR* •VECTOR ISCT UP XhTERRUPT RETURM 

S17* 8M0D1A {ENABLE. INPUT MODULES TO XNTERRUPT 

•1* fiCDADR tSEND DATA TO OUTPUT MODULE > 

• TMPO* PSM I SET PROCESSOR PRIORITY TO LEVEL '6 

,R0 I WAIT HERE rOR ANY INTERRUPT 

M ^ ' . ; I 

.>2 ^ , . ' 

, \ |N0 
'SIHI7 ' , 

IIMIERRUPT SERVICE ROUTINE 
SXNT6RI .P0PSP2^ IRESEI SP 

> HQV¥;,,-,r„nBDADR» •TMPO 
.^ERROR.-'S; , . ' ' 







MAINDEC-ll-OZKHA-A 
DZKHA.SRC 



MACyil.to24 2H-JAN-T4 lOlOH PAGL 14 
TEST5 



607 
bOI 
609 
610 
611 
613 
61 J 
614 
619 
616 
617 
611 
619 
620 
631 
622 
62J 
624 
625 
6 26 
627 
62« 
629 
610 
631 
632 
63) 
614 
6)S 
616 
637 
639 
639 
640 
641 
642 
643 
644 
649 
646 
647 
641 
649 
690 
691 
692 
6S3 
654 
695 
•96 
697 
699 
699 
660 



002644 
002646 
002694 
003*62 
003670 
003676 
002/04 
002706 
002710 

002712 
002716 
002720 
002736 



003730 
002736 
002744 
002752 
002760 
003766 
003770 
003776 
003004 
003012 
003014 
003016 

003022 
003026 
003030 
0030)2 
003034 
003040 

003044 
003046 
003094 
003096 
003060 



000004 
012737 
012737 
013777 
01)777 
012777 
009000 
009300 
100376 

000137 
022626 
017737 
104003 



012737 
012777 
012737 
013777 
012777 
000005 
052777 
017737 
023737 
001403 
104004 
000137 

005037 
009000 
109200 
100)76 
010177 
0001)7 

023626 
0177)7 
104007 
000004 
0001)7 



000340 
000)40 
002)10 
0090)4 
000001 



000340 
003044 
177777 
005034 
052929 

000100 
176242 
001246 



0027)0 
177776 



001240 
0016)2 



17»l7i 
0016)2 



177776 
001270 
001410 
001)42 
176))6 



0027)0 

176)20 001270 



SINT7I SCQPE 
MOV 
HOV 
MOV 
MOV 
MOV 
CLff 
INC 
BPL 

JMP 

SZNT7FI P0PSP2 
MOV 

CRROR 3 



177776 
001334 
001246 
001260 
1762S4 

000732 
001290 
001290 



INITI 



111 



001270 



INXTRl 



fPHIORTY LEVEL 7 INTERRUPT TEST 
INO INPUT MODULES SHOULD INTEHRbPT 
|«ITH PROCESSOR AT THIS LtVEL 



• J40> 

• 340f 
•SiNTRi 
517, 

• I, 
RO 
RO 
.-2 

INIT 



9lBDA0R.iTMP0 



PSW ILOCK OUT INTLRRUPTS 

ITMPO 

9 VECTOR I SET UP INTERRUPT RETURN 
9M0D1A lENABLE INPUT MODULES TO INTERRUPT 
9IC0ADR tSEND DATA TO OUTPUT MODULE 
IWAIT HERE rOR ANY INTERRUPT 



INO 

IPESET SP 



!•••••••«•••«•••• 

I INITIALISATION TEST FOR MODULES 
!•••••*•••••••••« 



MOV 
MOV 
MOV 
MOV 
MOV 
RESET 
BIS 
MOV 
CMP 
BCO 

ERROR 4 
JNP 

CLR 
CLR 
INCB 
BPL 

MOV 
JMP 

P0P5P2 
MOV 

ERROR 7 
SCOPE 

JMP SINGLE 



•340< PSM 

•INITR, 9VECT0R 

$•1, ICODAT 

S17, 9M0D1A 

•92»39« 9IG0ADR 

■lOOftSTKS 
B9BDADR* IBDDAT 
•C0DAT« 9BDDAT 
II 

INIT 



ILOCK OUT INTERRUPTS 

ISET UP rOR POSSIBLE INTERRUPT 

fSNOULD GET ALL ONES BACK AFTER INITIALIZI. 

lENABLE INPUT MODULE TO INTERRUPT 

tSENO DATA TO OUTPUT MODULE 

ISYSTCN INXTIALXXC 

ICCT DATA PRON INPUT MODULE 
|MAS DATA ALL ONEST 

I IK IT rAXLCO TO INXALXZE NODULES 



9VECT0R 



lALLOM INTERRUPTS, SEE IP INPUT 
tMOOULE INTERRUPTS - IT SHOUON'T 
IINTIALIZL SHOULD HAVt CLEARED 
IINTERRUPT ENABLE BITS 

IGO BACK AND PICK-UP .'NCM CONNECTION 



PSH 
RO 
RO 
.-3 
Rlf 

SINGLE 

IINTERRUPT HANDLE 

IRESET SP 

9IBDAOR#ITMPO 

IRESET (SYSTEM INITIALIZE) FAILLO 
ITO CLEAR INTERRUPT ENABLE BIT IN 
ICSR (FOR THIS INPUT NODULE) 



HAZNDtC-n-DZKHA-A MACyU.624 2U»Jhh'T* lOiOe 

DZKHA.SRC TESTS 

661 
662 
66 J 
664 
669 
666 
667 



668 


003064 


012737 


00307^ 


001224 


DUALl 1 


MOV 


669 


003072 


012701 


004270 




DUALI 


MOV 


670 


003076 


012702 


004290 






MOV 


671 


003102 


009711 






181 


TST 


672 


003104 


001403 








BCQ 


67] 


003106 


017172 


000000 


000000 




MOV 


674 


003114 


005722 






281 


TST 


67S 


0031 16 


005721 








TST 


676 


003120 


020127 


0043C0 






CMP 


677 


003124 


001366 








BNC 


678 










OUAl^l 




679 


003126 


012701 


004270 




MOV 


680 


003132 


012702 


004250 






MOV 


6Bl 


003136 


017137 


000000 


001242 


181 


MOV 


612 


003144 


001413 








BEQ 


6iJ 


003146 


011237 


001270 






MOV 


684 


003152 


017737 


176064 


001244 




MOV 


685 


003160 


005137 


001244 






COM 


686 


003164 


023737 


001242 


001244 




CMP 


687 


003172 


001007 








BNC 


68B 


003174 


005721 






281 


TST 


689 


003176 


005722 








TST 


«90 


003200 


020127 


004300 






CMP 


691 


003204 


001354 








BNC 


692 


003206 


000137 


003214 






JMP 


693 


003212 


104005 






381 


CPBOP 


694 














695 














696 














697 














698 














699 














700 














701 














702 


003214 


000004 






AINTI 


SCOPE 


701 


003216 


012704 


004304 






MOV 


704 


003232 


009024 






1081 


CLP 


705 


003224 


020427 


004314 






CMP 


706 


003230 


601374 








BNE 


707 


003232 


012737 


000340 


177776 




MOV 


708 


003240 


012702 


004250 






MOV 


709 


003244 


012703 


004270 






MOV 


710 


003290 


013777 


005034 


000762 




MOV 


711 


003296 


012704 


004304 






MOV 


712 


0033«2 


012709 


004316 






MOV 


7tJ 


00I2«* 


013700 


0042i0 






MOV 


714 


00S272 


012720 


003476 






OV 



PACL IS 



(DUAL ADDFCSS TEST FOP ALL 
ICONNLCTEO MODULES 



•OUAL» ILPADH 



PI 
P2 



•M005C* 
•MODSAi 
(1) 
28 

• CD* 
(2)» 
(!)♦ 

Pl«iMOD8C«2 
II 



8(2) 



•MODSC* 
•M0D5A* 
«(!)* 
28 

(2)* 
•SCDADP 

8BDADP 

SGDADR. 

38 

{1}« 
C2)» 

ni, 

18 

AINT 



PI 
P2 

8CDADR 

8TMP0 
*8BDADP 

8BDADP 



ICCT LIST or CONNECTIONS 
ICET LIST or OUTPUT MODULES 
ICONNECTION EXITT 

IMOV ADP or INPUT MODULt TO OUTPUT MODULE 
lUPDATC POXNTLPS 

tCHECK rOP END or LIST 



ICCT POINTER LIST AGAIN 

tCET ADDR or INPUT MODULE IF EXISTANT 

ICCT AODP or OUTPUT MODULE 
tCET DATA PROM INPUT MODULE 
iJUSTiry DATA 

lOATA PCCIEVED IN INPUT MODULE SHOULD BE 
I ITS OWN ADDRESS 
lUPDATE POINTERS 



•M0D8C*2 lEND or LIST? 



tYCS« EXIT 

lEPROP • SENT AODPCSS OF ALL INPUT MODULES 

ITO PCBPCCTIVC OUTPUT MODULES - BUT DIDN'T RCCUVt 

tCOKPCSPONDING ADDPESS FROM INPUT MODULE 



ITHIS ROUTINE CHECKS THE ORDER IN WHICH HE RCCXCVC 
t INTERRUPTS BACK rPOM ALL NODULES 



•INTP0*R4 
(4)« 

P4» aiNTPO^lO 
108 

tJ40f PSW ILOCK OUT INTERRUPTS 

•MODSA. R2 ICCT OUTPUT MODULE POINTER 

•M0D5C* RJ ICET CONNECTION POINTER 

8l7, 8M0D1A ICNABLE INPUT MODULES TO INTERRUPT 

•INTPOf R4 ISCT UP TO STORE ORDER OF INTERRUPTS 

8INTP01> R5 tSETUP TO STORE VALUE OF INTERRUPT 

MODlVfRO ISET UP INTCRUPT SERVICE ROUTINES 
•INTRS1# (0)* 



NAXNOeC«ll-DZKHA«A 
OZKHA.SHC 



MACYlltb24 2a-J»M«74 IO1O8 
TESTS 



715 


003276 


012720 


000140 






MOV 


71ft 


001302 


012720 


001510 






MOV 


717 


001306 


012710 


OO0J40 






MOV 


71t 


003312 


013700 


004264 






MOV 


719 


003316 


012720 


001522 






MOV 


720 


003322 


012720 


000140 






MOV 


721 


003326 


012720 


001514 






MOV 


722 


003332 


012710 


000140 






MOV 


72J 


003336 


005037 


000000 






cm 


724 














72S 


003342 


005713 






111 


T5T 


72ft 


003344 


001403 








BLQ 


727 


003346 


017172 


000000 


000000 




MOV 


728 


003354 


005723 






261 


TST 


729 


003356 


005722 








TST 


7J0 


003360 


020227 


004260 






CMP 


711 


003364 


001366 








BNE 


732 


003366 


005017 


177776 






CLR 


73J 


003372 


005000 








CLU 


734 


003374 


005200 








INC 


7J5 


003J76 


001376 








BNE 


71ft 


001400 


000005 








RESET 


737 


003402 


052777 


000100 


000310 




BIS 


7]> 














739 


003410 


012704 


004302 






MOV 


740 


003414 


005724 






391 


TST 


741 


003416 


021464 


000002 






CMP 


742 


003422 


00240) 








BLT 


74J 


003424 


005764 


000002 






TST 


744 


003430 


001005 








BNE 


74S 


003432 


020427 


004310 




411 


CMP 


746 


003416 


001366 








■NE 


747 


001440 


000137 


00S762 






JMP 


741 














749 


001444 


012705 


004316 




AZNTCRI 


NOV 


750 


003450 


012537 


001254 






MOV 


751 


003454 


012537 


001256 






MOV 


752 


003460 


012537 


001260 






MOV 


753 


003464 


012537 


001262 






MOV 


754 














755 


003470 


104006 








CRPOP 


756 














757 


003472 


000117 


005762 






JMP 


751 














7S9 














7ftO 


001476 


013725 


004240 




INTRSII 


MOV 


761 


001502 


012724 


000003 






MOV 


762 


001506 


000002 








RTX 


761 














7ft4 


003510 


011725 


004242 




Xf«TRS2t 


MOV 


765 


003514 


012724 


000004 






MOV 


766 


003520 


000002 








HTI 


7ft7 














769 


001522 


011725 


004244 




XNTRS : 


MOV 



PAGE 16 



•340« (0)* ILOCK OUT INTtPHUPTS -Hilt IN SLPVICE POUTXNC 

•INTRS2.(0)« 

•340* (0) 

MOOSV. no ITHE INTERRUPT SERV, ROtTINL MILL 

• INTRSJ»(0)* I ASSIGN A NUMBER AND STORE ON A STACK 

■)40i (0)* ISO WC CAN OETEPMINL LATER THE 

•INTRS4*(0)« tORDCR THE INTERRUPTS CAMt IN 
•340* (0) 

0 fSURE ML CLEAR LOCATION ZERO. 

(3) (DOES CONNECTION KXISTT 
21 

9(1) « 9(2) ISEND INPUT MODULES AODh TO OUTPUT MODULE 

(!)♦ lUPDATC POINTERS 

(2)* 

R2i •M00IA«2 |AT END OP LXST7 

11 

PSN iNOii ALLOm the MORLD TO INTR, 

RO I MAKE SURE TO ALLOb PLENTY Of 

RO I TIME FOR EVERYONE 



.-2 

•100>»tTKS 



iTXMESoUP EVERYBODY SUULD BE 
IDONE 



• XIITP0*2»R4 
(4)« 

(4) » 2(4} irXRST < SECOND 
44 

2(4) |ltASN*T» BUT riAS IT A NON*EXSISTANT INIIR,? 

AINTER 

R4ftINTP0*4 tEND OP LXSTT 

II 

lEOP 

•INTPQl* R9 lERROR OCCURED • SETUP »0R TXPEQUT 

t5}*0 IRECO 
(5}** IRECl 
(%)*, •IIEG2 

(5) «» IRECl 

6 I MODULES INTERRUPTED OUT OF SEQUENCE 

ISHOULD BE (1) INPUT MOOULElf (2) INPUT M0DULE4 

•EOP 1(1) INPUT MODULEl. (4) INPUT M0DULE2 

I 

t INTERRUPT SERVICE ROUTINE FOR FIRST INPUT MODULE 

MODIA, (5)« ISTORE ADDRESS ON STACK 

•3, («)♦ iSTORE INTERRUPT VALUb ON STACK 



M002A, (5)* 
•4* (4)« 



MODlAr tii* 



MAXNOEC-n*DZKHA«« 
DZKHA.S»C 



HACyn.024 lotoa PAGE ^^ 

TESTS 



769 


001526 


012724 


770 


003592 


000002 


771 






772 


001534 


013725 


77J 


001540 


012724 


774 


001544 


000002 


775 






776 






777 






77J 






779 






7t0 






711 


003546 


117777 


712 


0035S4 


142777 


Tai 


003562 


122777 


714 


003S70 


001004 


785 


001572 


104400 


786 


001574 


011167 


787 


001576 


000137 


718 


001602 


122777 


784 


001610 


001002 


790 


001612 


000137 


791 


001616 


122777 


792 


003624 


001002 


791 


003626 


000137 


794 


003632 


00S737 


795 


003636 


001404 


796 


003640 


005037 


797 


003644 


104400 


798 


003646 


011174 


799 


003650 


117737 


800 


003656 


104400 


801 


003660 


005474 


802 


003662 


122777 


803 


003670 


001010 


804 


003672 


012737 


805 


003700 


005737 


806 


003704 


001402 


807 


001706 


012716 


808 


001712 


005237 


109 


003716 


000002 


810 






811 


003720 


177560 


812 


003722 


177562 


• IJ 






814 


003724 


022737 


815 


003732 


001002 


816 


003734 


000137 


817 


003740 


008737 


818 


003744 


001L04 


819 


003746 


005137 


820 


003752 


104400 


121 


0QS7S4 


011174 


822 


0037S6 


005337 



000001 



004246 

00000^ 



000150 
000200 
OOOQOJ 



005S42 

00002^ 

005476 
000177 

001724 
003776 

003776 



000015 

011537 
004330 

004030 
011534 



<*0W 
DTI 

ZKTPS4I MOV 
MOV 
UTI 



• 1. 



(4)* 



005760 
005752 
005744 



005724 
005710 



.S6TTL 
TTYINl 



005660 005474 



005644 
011534 



111 



• TKSI 
■ TKBt 



011540 011514 PUSHt 

005542 
003776 

003776 



011534 



POVB 

BICB 

CMPB 

BNF 

TYPt 

fCONC 

JMP 

CMPB 

BNC 

JMP 

CMPB 

BNE 

JMP 

T5T 

BEO 

CLP 

TYPE 

MBS 

MOVB 

TYPE 

MAPI 

CMPB 

BNE 

MOV 

TST 

BEO 

MOV 

INC 

PTX 

177560 
177562 

CMP 

BNE 

JMP 

TST 

BNE 

COM 

TYPi 

MBS 

DEC 



M0D4A« (5)* 
•2$ tit* 



lEND or TESTS 
HANDLtRS 

ilTKB, •TTYr<P iSTOPt 1».PUT 

• 200« 9TTYINP |»'ASK FOP STANDARD IN(>UT 

•3, tTTYlNP ICHECK FOP "C 



8TTYINP ICHECK FOU "P 

I IF "P THEN TYPE PUN SUMMAPY 

VTTYXNP ICHECK FOP PUBOUT 



INOI RUBOUTf BUT hAS FOpNLP A PUSUUTT 



STAK 

• 22* 
.♦6 
SUM 

• 177, 
.♦6 
PUSH 
PUBF 
.*12 
PUBF 



•TTYlNPiMAPl 



•15» fTTYiMP 
18 

•TTYlNB-liTTYXNP lOON'T CO TC DECODEP XF 
CFLC tNOT IN CONHAND MODI 

18 

•DeSirP«(6) ISET UP TO CO TO DECODEP POUTXNE 

TTYXNP 



•TTYXNB»TTY1NP lAT BECINNXNC OF BUFFEP7 

.♦» 

STAR 

PUBF IFLAC SETT 

.^12 

PUBF 

|N0» PRINT A SLASH 

TTYINP 



OZKHA, 


SKC 




92) 


003762 


117737 


824 


001770 


104400 


635 


003772 


005474 


82ft 


003774 


000002 


• 27 


003776 


000000 


821 






029 






8J0 






811 


004000 


127727 


• J2 


004006 


002406 


833 


004010 


127727 


834 


004016 


003002 


83S 


004030 


000262 


836 


004022 


000207 


837 


004024 


000242 


BJ8 


004026 


000307 


• 19 






840 






841 






842 






843 


004030 


052737 


844 


004036 


104400 


845 


004040 


011176 


8 46 


004043 


122777 


147 


004090 


001002 


8 48 


0040S2 


000137 


649 


004096 


122777 


•90 


004064 


001002 


• 51 


004066 


000137 


• 52 


004072 


122777 


• 93 


004100 


001002 


• 54 


004102 


000137 


• 9S 


004106 


122777 


• 96 


004114 


001002 


• 97 


004116 


000137 


• 98 


004123 


122777 


• 99 


004130 


001002 


• 60 


004133 


000137 


1*1 


004136 


122777 


162 


004144 


001002 


•63 


004146 


000137 


•64 


004192 


004737 


869 


004196 


102002 


• 66 


004160 


000137 


867 






•6* 






869 






670 






871 






I '2 






• 73 


004164 


0097J7 


• 74 


004170 


112777 


• 79 


004176 


009237 


876 


004202 


112777 



MACY11.624 28-JAV-74 10lO« 
KANDLLPS 

009546 005474 HQVB 

TXPt 
MAPI 
PTI 

PUBFI 000000 



000097 NUMBEPI CMPB 
BLT 

000071 CMPB 
BCT 
SCV 
PTS PC 
CLV 
PTS PC 



177776 PESirPt BIS 
TYPE 

MCPir 

009464 CMPB 
BNE 
JMP 

009450 CMPB 
BNE 
JHP 

009434 CMPB 
BNE 
JMP 

009420 CMPB 
BNE 

JMP 

009404 CMPB 
BNE 
JMP 

009370 CMPB 
BNE 
JMP 
JSP 
BVC 
JMP 



011534 UNKINPI TST 

000040 009336 MOVB 
011934 INC 

000077 005324 MQVB 



009546 



005530 
009920 



000340 



000101 

004333 
000126 

004660 
000106 

009036 
000104 

009100 
000115 

009334 
000123 

001446 

004000 

009130 



18 



•ITTINP.MAFl 



IIHIS ROUTINE CHECKS TO SEE IF INPUT )*AB A NUMBEP 
iSEtC ir INPUT IS A NUHBiP 



•TTTINP»I97 
,♦16 

•TTYlNPi871 
.♦6 



ISET V BIT ir 'AS A NUMBER 



ICOHMANO DECODEP 

•340i PSH ILOCK OUT INTEPPUPT& 

•toil BTTYIHP iSEL IT THE NANTCD TO IftPUT AOOPESS "A* 

.♦6 

INADR 

<126# fTTTlNP ISLE If HE XANTID TC INPUT VECTOR "V" 

.♦6 

INVET 

•106* BTTYIMP iSEE IF HE WANTED NORMAL CONNCCTIONS "F" 

.♦6 

INNOR 

• 104» BTTYINP ISEE IF HL itANTED TO DISCONNECT "D" 
.♦6 

INUNC 

•115« fTTYINP ISEE IF HAMTED A MAP "M" 
INMAP 

•123» BTTYINP ISEE IF HE mANTED TU START TESTINb "S" 

• ♦6 

START 

PC» NUMBER ISEE IF HE MINTS TO CONNECT TNO NODULES 

SINCO 



I 

t UNKNOWN INPUT - TELL HIM 
I 

TTYINP 

•40« BTTYINP ITYPE SPACE 
TTYINP 

•77, BTTYINP ITYPE "1" 



MAINDCC-ll-DZKHA-A 
OZKHA.SDC 



MACyil«»34 2B-JAN"74 lOlOt PAGE 19 
HANDLfcRS 



877 


00431 0 


005237 


01 1534 






878 


00421 4 


109077 


009314 






1179 












880 


00432C 


1C4014 








8li 












882 


004222 


000137 


005542 






88] 












884 












88S 


004326 


032737 


000001 


004500 


ODDADRt 


886 


0043J4 


001 393 








817 


0042J6 


000307 








8il 












819 












690 












891 












892 


004240 


164000 






MODlAt 


89J 


004243 


164003 






M0D2AI 


894 


004244 


164004 






MODIAI 


895 


0P4246 


164006 






«(0D4AI 


896 


004250 


164010 






N0D5AI 


897 


004252 


164012 






N0D6AI 


898 


004254 


164014 






K0D7AI 


899 


004296 


164016 






NQDIAl 


900 


004260 


000170 






NODlVl 


901 


004262 


000174 






M002VI 


902 


004264 


000270 






MODIVI 


901 


004266 


000274 






H004VI 


904 


004270 


000000 






M0D5CI 


90S 


004272 


000000 






M006CI 


906 


004274 


000000 






M0D7CI 


907 


004276 


000000 






MOOSCI 


901 


004JOO 


000000 






VECTOItl 


909 


004J02 


000000 






SFIVEi 


910 


004J04 


000000 






XNTPOl 


911 




004316 








912 


004116 


000000 






INTPOll 


911 




004330 








914 


004J30 


000000 






CFLCl 


915 












916 












917 












918 












919 


004312 


005237 


011534 




INAORI 


920 


004JJ6 


122777 


000111 


005170 




921 


004344 


001002 








922 


004346 


0001 J7 


004504 






921 


004352 


122777 


000117 


005154 




924 


004360 


001002 








92S 


004362 


000137 


004572 






926 


004366 


000137 


004164 






927 












928 












929 












930 


004372 


009037 


004500 




XNUHBt 



INC 
CLRa 



TTriNp 

•TTXXNP 



EHKOK 14 
JMP STAR 



BNE 
RTS 



164000 
164002 
164004 
164006 
164010 
164012 
164014 
164016 
000170 
000174 
000270 
000374 
000000 
000000 
000000 
000000 
000000 
000000 
000000 
»"t*lO 
000000 
.■•♦10 
000000 



INC 

CMPB 

BNE 

JMP 

CHPB 

BNE 

JMP 

JMP 



• 1 « 

UNKXNP 
PC 



NINP 



ITERMINATOP 

lUNKNOMN INPUT FPOM OftHAIQH 
ICXXT 

IIS IT AN ODD AOf>? 



I NAP or MODULES 

lADDR or INPUT MODULES 

lADDfl or OUTPUT MODULES 

ivecToP or input modules 

ISTATUS or OUTPUT MODULES 



I INDICATES SOrTkiARE MODE 

t INPUT ADDRESS DECODER 
TTtlNP 

•lllf BTTYINP IINPUT MODULE ADDRS7 "X" 
XNADRX 

•117t BTTYINP (OUTPUT MODULE ADDRS7 "0" 
.♦6 

INADRO 

UNKXNP (UNKNOWN INPUT 

ITHIS ROUTINE INPUTS A NUMBER 
NINP ICLR NUMBER 



MAINDEC-M-OZKHA-A 
OZKNA.SRC 



MACYU.024 2H-JAN-74 lOlOB 
HANOI. I. PS 



931 


004376 


063737 


000003 


011534 


932 


004404 


004737 


004000 




933 


00441 0 


103407 






934 


004412 


122777 


000019 


0091 14 


939 


004420 


001001 






936 


004422 


000307 






937 


004424 


0001 37 


004164 




93t 


004430 


000241 






939 


004432 


006137 


004900 




940 


004436 


006137 


004900 




94« 


004442 


0061 37 


004900 




942 


004446 


1 17737 


009062 


004902 


943 


004454 


043737 


177760 


004902 


944 


004462 


06J737 


004902 


004500 


949 


004470 


005237 


011934 




946 


004474 


000137 


004404 




947 










948 


004900 


000000 






949 


004503 


000000 






990 










991 










952 










993 










954 


004904 


004737 


004372 




955 


004510 


004717 


004336 




956 


004514 


0137J7 


004900 


004240 


95 7 


004523 


063737 


000003 


004500 


951 


004530 


013737 


004500 


004242 


959 


001936 


063737 


000002 


004500 


960 


004544 


013737 


004500 


004244 


961 


004593 


063737 


000002 


004500 


962 


004560 


013717 


004500 


004246 


963 


004566 


000137 


005542 




964 










965 










966 










967 










968 


004572 


004737 


004373 




969 


004576 


004737 


004226 




970 


004602 


013737 


004500 


004250 


971 


004610 


063737 


000002 


004900 


972 


004616 


013737 


004500 


004252 


973 


004624 


063737 


000002 


004900 


974 


004632 


013737 


004900 


004254 


975 


004640 


062^37 


000002 


004500 


976 


004646 


013737 


004500 


004256 


977 


004654 


000137 


005542 




978 










979 










980 










981 


004660 


009237 


011934 




982 


004664 


005037 


005024 




983 


004670 


004737 


004000 




984 


004674 


103402 







ADD 

111 JSP 

BVS 

BNE 
PT5 
JMP 

281 CLC 

POL 

POL 

POL 

MOVB 

BIC 

ADD 

INC 

JMP 

NXNPI 000000 
NINPTI 000000 



XNADRIt JSP 
NTrOl J5R 
MOV 
ADD 
MOV 
ADD 
MOV 
ADD 
MOV 
JMP 



XNADPOl JSP 
NTFll JSP 
MOV 
ADD 
MOV 
ADO 
MOV 
ADD 
MOV 
JMP 



INVETl 



INC 
CLP 
JSP 
BVS 



20 



• 2. 


TTYINP 


lUPOATE POlNTtP 


PC» 


NUMbEP 


ISEL ir ITS A r.UHBKK 


21 




IV HIT StT IT IT MAb 


• 19* 


PTTYINP ICAPPIACC PtTUHN? 


, «4 






PC 




lEXIT 


UNKINP 




lUNKNOwN INPUT 


NINP 






NINP 






NINP 






•TTYINP 


.NINPT 


ITEMP STOHACE Of" NUKBtP 


•177760 


.NINPT 




NINPT* 


NINP 


lADD NUMBEP 


TTYINP 






18 






rTHIS ROUTINE 


SETS ADDPS or INPUT MODULk-S 


PC» 


INUKB 


1 INPUT ADDRESS 


PC# 


ODDADP 


ISEE IP ODD ADR 


NINP» 


MODIA 


ISCT INPUT MuDULI.9 ADDNfcSS 


• 3. 


NINP 




NINP. 


NOD 2 A 




• 2. 


NIHP 




NINP. 


M0D3* 




• 2. 


NINP 




NINP. 


M0D4A 




STAP 




ILXIT 


ITHIS ROUTINE 


SETS ADORtSS OP OUTPUT MODULES 


PC. 


INUMB 


IINPUT ADDRESS 


PC, 


ODDADR 




NINP. 


M005A 




• 3. 


NINP 




NINP. 


M0D6A 




• 2. 


NINP 




NINp. 


M0D7A 




• 3. 


NINP 




NINP. 


M0D8A 




STAR 




lEXXT 


ITHIS ROUTINE 


SETS VECTOR ADDRESSES 


TTYINP 




lUPDATE POINTER 


INVCTT 






PC. 


NUMBEP 


tSEE IP NUMBER POLLOWS 


18 







HAINOEC-IUDZKHA-JI 



DZRMA. 


IRC 




9IS 


004676 


000137 


916 


904702 


117737 


917 


004710 


004737 


911 


004714 


004737 


919 


004720 


163737 


990 


004736 


033737 


991 


004734 


001402 


992 


004736 


000137 


99J 


004742 


0437 37 


994 


004750 


000241 


995 


004752 


006137 


996 


004756 


006137 


997 


004762 


062737 


998 


004770 


013777 


999 


004776 


063737 


1000 


005004 


063737 


1001 


005012 


013777 


1P03 


005020 


000137 


lOOJ 


005034 


000000 


1004 


005036 


000000 


1005 


005030 


000000 


1006 


005033 


000000 


1007 


005034 


000000 


1001 






1009 






1010 






1011 






1012 


005036 


012737 


1013 






1014 


005044 


012737 


1015 


005053 


013737 


1016 


005060 


012737 


1017 


005066 


013737 


1011 


005074 


000137 


1019 






1020 






1031 






1022 






103J 


005100 


005037 


1034 


005104 


005037 


102S 


OOSllO 


005037 


1026 


0051 14 


005037 


1037 


005130 


005037 


1031 


005134 


000137 


1039 






1010 






1031 






1032 






103J 


005130 


1 17737 


1034 


005136 


043737 


103S 


005144 


123737 


103» 


00S1S3 


003011 


1037 


00S1S4 


005337 


1031 


005160 


100406 



MACyil|624 29-JAN-74 lOtOI PACE 21 
HANDLEPS 



904164 






J««P 








004626 


005024 


141 


f OVB 


PTTtlhP 


t INVtTT 


lTt»<P STOHACE Ot mHICH VECTOPS 


004373 






JSff 


PC« 


INUHB 


ICET ADDPtSS 


004226 




NTF JBl 


JSP 


PC» 


OODADP 


ISEE Xr ODD AOPLSS 


000001 


005024 




SUB 


• 1 » 


INVETT 




177000 


004500 




BIT 


■ 177000 


>NINP 


ISEE ir LtCAL VECTOP ADDP, 








BEQ 


,♦6 






004164 






JNP 


UNKINP 




aun UllunLB ffftB^CB THAU 

|NQ# NUnPLP LAPuLf IHAn J7D 


000176 


005034 




BIC 


• I76i 


INVETT 


IIEPO Or ONE 








CLC 








005024 






POL 


IMVITT 






005024 






POL 


INVtTT 






004260 


005024 




ADD 


■ HODl V 1 


INVLTT 


ISLT POINTEP TO STOrACE Of VLCTuH 


004500 


000036 




HOV 


NIWP» 


• IN VETT 


AAMnMV ^ip^vrtM knnn^Lff 

ISTOPE VrCTOP ADOPEbS 


000003 


005024 




ADD 


• 2f 


INVETT 




000004 


004500 




ADD 


• 4» 


M T kl D 

N X n r 




004500 


000004 




MOV 


NINP« 


BINVETT 




005542 






JMP 


STAR 










XNVETTI 


000000 












XhVtT2l 


000000 












S15I 


000000 






ITEMP STORAGE 






5161 


000000 






ITEXP STOKACE 






5171 


000000 






IINTP, ENABLE BITS TO SLNQ TO KIT 



ITHIS ROUTINE MAKES NORMAL CONNECTIONS 



004340 004270 INNORl MOV 



004242 004272 

004244 004274 

004246 004276 

000017 005034 
00S542 



MOV 
NOV 
MOV 
NOV 
JMP 



•MODlAf M0D5C 

•M002A, M0D6C 

•HODSAr M0D7C 

•N004A« M0D8C 

•17, Sl7 
STAR 



IMOD ADDP or LOCATION THAT 
{CONTAIN ADDP OK INPUT MODULE TO 
lOUTPUT MODULES STATUS tiOHD (ME*10PY) 



ITHIS ROUTINE UNCONNECTS MODULES 



004270 INUNCt CLP M005C 

004272 CLR M0D6C 

004274 CLP N0D7C 

004276 CLR NODiC 

005034 CLR ftl7 

005542 JNP STAR 



I THIS ROUTINE CONNECTS TMO MODULES 

004400 005024 s/nCOI h-OVB PTTTINP, INVETT ISTORE INPUT NODULE • (1-4) 

177760 005024 BIC • 1 77760 » INVLTT 

005034 000004 CMPB INVETT* 14 ISEE IF ILLEGAL 

BCT II 

005034 DEC INVETT 

BMI II 



MAINOEC-ll-DZKHA** 
DZKHA,SRC 



MACyll.»24 2»'Jht>»T* 10108 PACE 22 



IV My 


A A4 14 9 
V 07 1 V 4 


A AS 7 1 7 
003 « J ' 


01 1 % 14 




0 09 1 D O 


1 797 7 7 




10 4 1 


A A4 17 4 


A A 1 4 A 9 




1 n A 9 

1 04 


A A4 1 74 

V O 0 1 r V 


A A A 1 17 


004 1 AA 


I U ' J 


A AS 3 A 9 
O O 7 « V • 


A AS 917 


011514 

w I 4 * J ^ 


J w ^ ^ 


OOS 904 

V V 9 • V O 


01 17 17 


009024 


1 w * 3 


OAS 3 1 4 


OOSO 17 


009030 




V V 7 • • V 


00034 1 

V V V • O A 




1 n47 


00S232 

V V 9 • # • 


004 117 


005030 


1 041 


00S226 


005337 


005032 


1049 


005212 


100 J73 




1 03 W 


00S3 14 




005030 


1 AS 1 


00S242 

W V V • V • 


004737 


004000 


\ AS ? 


009246 


1 17737 


004263 


1 AS 1 


00S2S4 


042737 


177760 


1 AS4 

1 W 7 V 


00S24 2 

V U 9 • W A 


1A2737 


000005 


1 ASS 


00S27 A 


1 00 742 




1 AS6 


005272 


000241 




1 057 


005274 


0061 37 


005024 


1 058 


005 300 


062737 


004240 




005 ]0A 


000241 




t RAO 


*00S 11 0 


OOAl 37 


005026 


1 OA 1 


005 114 


062737 


0042?0 


1 OA 3 


00S322 


01 3777 


009024 


1 OAi 


005330 


000137 


009542 


1 0A4 








1 065 








lOAfe 








1 067 








4 V » • 


005334 


005037 


177776 


1 069 


005340 


104400 




lo7o 


005342 


01 1234 




107} 


009344 


012717 


000261 




005392 


01 2701 


004240 


1073 


009356 


012702 


004260 


1074 


005362 


104400 




1075 


005364 


011321 




1076 


005366 


104400 




1077 


005370 


009474 




1071 


005372 


104400 




1 079 


005374 


011334 




1 olo 


009376 


012146 




1011 


009400 


104402 




1012 


009402 


104400 




1013 


009404 


Oil 340 




1014 


009406 


012246 




lOlS 


009410 


104402 




1016 


005412 


005237 


005474 


1017 


009416 


022701 


004250 


10I6 


005422 


001397 




1019 


009424 


104400 




1090 


009426 


011321 




1091 


009430 


104400 




1092 


009432 


009474 





004340 



009032 



111 



2il 



005034 

005026 
009026 
009026 



009024 



009026 
177476 



INMAPl 



4 


TTYINP 

• A ■ 4 •» r 




CI*PB 


• 74< 


PTTY InP 


BCO 


. *A 
t ' 




JMP 


UNK INP 






TTYINP 




MOV 


I NVETT » 


Sl6 


CLP 


515 




stc 






POL 


SIS 




DLC 


S16 




BPL 


21 




BIS 


S15«Sl 7 




JSP 


PCi 


NUMBEK 


MOVB 


PTTYXnP» 


INVET2 


BXC 


•1777b0» 


INVLT2 


SUB 


• 5 • 


ZNVET2 


BMI 


1 1 




CLC 






POL 


INVCTT 




ADO 


■MOOlAt 


INVETT 


CLC 






POL 


INVCT2 




ADO 


•HOOSCf 


XI«VET2 


MOV 


mvcTT* 


9INVCT2 


jnp 


STAR 






ITHXS POUTINC N 


CLP 


PSH 




TYPE 






MNHD 






MOV 


• 261t 


MAPI 


NOV 


• •1001 A. 


Pi 


MOV 


•MOOIV* 


*2 



INMAPII TYPL 
MSSP 
TYPE 
MAPI 
TYPE 
M3SP 
MOV 
TYPOC 
TYPE 
MrUN 
MOV 
TYPOC 
INC 
CMP 
BNE 

lit TYPE 
M8SP 
TYPE 
MAPI 



lUNKNO«iV INPUT 

ISET INTP, tNABLL BITS Of ONLY 
ITHOSL MODULES THAT MEPt SELLCTLO 

irOPM ENAHLL BIT l*Y NUMBtP UP 
(INPUT MODULE Sf.LlCTLD 



ICHECK POP NUMBEP 

ISTOPE • or OUTPUT MODULE 

INUMBEP CANNOT BE LtSS THAN 5 



ICET ACCUAL ADDP 



(l)*f-{SP) 



(2)»#-(5PJ 
MAPI 

•M005Ai Pl 
INMAPl 



fCXIT 



lALLOMS XNTCPPUPTS 
tTYPE NAP HEAOCP 

fSET rOR FIRST MODULE 



ITYPE SS SPACES (CAHPIAGE RETURN) 
I TYPE MODULE NUMBER 



ISAVE (!)♦ rOP TYPEOUT 
rCO TyPE--OCTAL ASCIKALL DIGITS) 
ITYPE "2SP INPUT 5SP" 

(SAVE (2)* rOP TYPEOUT 

ICO TYPE— OCTAL AsCXKALL DIGITS) 

IDONE ALL INPUT MOOULtS? 



HAIhDEC 


• 1 l«DZKHA-« 


HACyll. 


»24 29- 


JAh"T4 


■ A • AA 
IPllll 


DZKHA.SRC 




HAMDLLI>S 






1091 


009434 


104400 








TTrE 


1 094 


00543* 


011334 










109) 


009440 


012146 










1096 


009442 


104402 








11 rut 


1097 


009444 


104400 








TTFL 


1091 


00944* 


01 1359 










1099 


005490 


013246 










1100 


009452 


001401 








■ r a 


1101 


009454 


104402 








TirOC 


1102 


00545* 


005237 


005474 




<• • 




llOJ 


0094*2 


020127 


004260 








1104 


0054*6 


001356 








B n Bi 


llOS 


005470 


000137 


00594i 






JMP 


110* 


005474 


M M M A A A 

000000 






MAP 1 1 
" Ar 1 ■ 


OOOOOB 

V V W W V V 


1107 














1101 














1109 














1110 














1111 














1112 














lllJ 














1114 














Ills 














111* 


00547* 


104400 






SUM 1 
0 w n I 


TVPr 


1117 


005500 


011440 








n o V n 


111* 


009502 


013746 


00121b 






MflV 
nw « 


1119 


00990b 


104402 








T V D(ir 


1120 


009910 


104400 








T vDr 

X I r L 


1121 


009912 


011334 








M 1 CD 

n Jar 


1122 


009514 


01 3 '46 


001230 






Mn V 


112J 


009920 


104402 








T vpnr 
1 1 r u\> 


1124 


005522 


f A A A A A 

1 0440Q 








1 XrCi 


112S 


005524 


A 1 1 1 7 & 

Q 1 1 1 'B 








MCRLF 


112* 


00552* 


A A ft Y 1 Y 


004330 






T5T 


1127 


005532 


001402 








B b W 


1121 


005534 


0001 3? 


005542 






JMP 


1129 


005540 


000002 




• 




r ft « 


1 130 














UJl 














1112 


005542 








3 i AF 1 




ll3i 


005542 


012706 


001100 






Mn V 


1114 


00554* 


01 2 '37 


00*034 


000020 




Mnv 


1135 


005554 


01 2' j7 


000340 


000022 






113* 


0055*2 


• A K A W 

109037 


001220 








1137 


0055*6 


012' J7 


005542 


001224 




Mnv 


1131 


005574 


A 6 ••1 % 4 

0127 J7 


00*212 


000030 




Mnv 


1139 


005*02 


01 27 J7 


000340 


000032 




Mnv 


1140 


005*10 


01 27 J7 


007014 


000034 




Mnv 


1141 


005616 


n% <9 Y V T 
012 717 


000340 


00003b 




Mnv 


1142 


005624 


012737 


007044 


000024 




MOV 


1143 


005*32 


012737 


000340 


000026 




MOV 


1144 


005*40 


005037 


001216 






CLR 


1145 


005*44 


005037 


001222 






CLR 


1146 


005650 


005037 


001300 






CLR 



23 



(i)*#-tsr) 



2* 

MAPI 

Rl» 
II 

STAR 



•(SP) 



ISAVC (1)* *0i» TVPEOUr 

tCO TVRf;**OCTAL ASCIKALL DlCITi>) 

ITYPE •2aP*'0UTPUT *SP M/A 25P" 
ITYPE CONNECTION 



•M0DIA«2 



(RUN SUMHARY TTPEOUT ROUTINE 
I 

tTYPE HEADER 



•PASS,-(SP) 



I SAVE IPASS FOR TYPtOUT 

iCO TyPE-*OCTAL ASCIKALL DIGITS) 



IERTTL**(SP} 



(SAVE lERTTL FOH TYPEOUI 

iCO TYPL*"OCTAL ASCIKALL DIGITS) 



CFLC 
STAR 

tMONITOR HONE 



I IF IN COHMAND MODE RtTURN TO SIAK 
IRETURN TO WHAT NE "ERE DOING 



f STACK, SP 
tSSCOPEf 9VI0TVCC 
t340*9tIOTVtC*2 
ITSTNM 

•STARflLPADR 

••ERROR#»«EMTVEC 

•340f ••eHTVEC«2 

•ITRAPftlTRAPVCC 

•340«»tTRAPVEC«2 

• IPiiRDNftCPNRVEC 

t340»*iPI«RVECf2 

iPASS 

IICNT 

•TIMES 



ISETUP THE STACK POINTER 
HOT VECTOR FDR SCOPE ROUTINE 
I LEVEL 7 

UNITIALIZE THE TEST NUMBER 
UNITIALIZE THE LOOP ADDRESS FOR SCOPE 

lEMT VECTOR FOR ERROR(ERROR) ROUTINE 

»LEVEL 7 

tTRAP VECTOH FOK TRAP CALLS 
tLEVEL 7 

IPOHEK FAILURk VECTOR 
ILEVEL 7 

(CLEAR THE PASS COUNT 
UNITIALIZE THE ITERATION COUNTtR 
UNITIALIZE NUMBER OF ITERATIUNS 



MAINOEC-U-DZKHA-A 
OZKHA.SfiC 



MACyil|b34 2i*-JAN>14 lOlOti VkGl 24 
MANDLtRS 



147 


005654 


1050J7 


001221 


Mt 








149 


005660 


005037 


001230 


ISO 


005664 


005237 


004330 


ISI 


005670 


012737 


000340 


1S3 


005676 


005037 


003776 


15J 


005702 


012737 


011540 


1*4 


009710 


105737 


001107 


1S9 


005714 


001402 




156 


005716 


000137 


007200 


157 


005722 


012737 


003546 


151 


00S7J0 


012737 


000340 


159 


005716 


0050J7 


177776 


160 


005742 


104400 




161 


005744 


011402 




162 


005746 


092777 


000100 


161 


005754 


000001 




164 


005756 


000137 


005754 


165 








166 








167 








168 








169 








17C 








171 








172 








17J 


00S762 


004737 


007500 


174 


005766 


005037 


001220 


175 


005772 


005037 


001300 


176 


005776 


005237 


001216 


177 


006002 


032737 




171 


006004 


000000 




179 


006006 


001216 




110 


006010 


001007 




111 


006012 


013700 


000042 


112 


006016 


001404 




19J 


006020 


004710 




114 


006032 


000240 




lis 


006024 


000240 




116 


006026 


000240 




117 


0060J0 


000137 


001446 



177776 
011534 



000060 
000062 



175744 



1*1 



CLRB 




ICLLAH THE LMHOH KLAG 


CLP 


lEPTTL 






cric 


ISET COMMAND MODE 


MOV 


■J40* P&h 




CLR 


p\itr 




MOV 


•TTYINBiTTYINP 




TSTB 


•TPFLC 


ISEL ir THLHL 15 A TEHMINAL 


BEQ 


It 


lir YES CO AHEAD NORMALLY 


JHP 


NTH 


lir NOT THEN CO TO *iO TERMINAL 


MOV 


tTT*IN,»«60 




MOV 


•340* •■62 




CLR 


PSW 




TlTPf 




,TYPE 


MSTAR 






BIS 


•100»9ITKS 




WAIT 




ISPLND REST OF TIME HLRt 


JMP 


.-2 





.SBTTL 

(•INCREMENT THE 
fir THERES A K 
fir THERE ISN* 
•iOPi JSR 

CLR 

CLR 

XNC 

BIT 

•ENDCTI .WORD 
• PASS 
BNE 

SCET42I MOV 
BEQ 

•ENOADI JSR 
NOP 
NOP 
NOP 

•OOAGNI JMP 



END or PASS ROUTINE 

PASS NUMBER 
CNITQR CO TO IT 
T JUMP TO START 

PC* COPT 

•TSTNM 

•TIMES 

• PASS 

(PC)**B(PC)^ 
0 

•DOACN 
••42rR0 

•DOACN 
PC,(R0) 



••START 



IZEHO THE TEST NUMBER 

(ZERO THE NUMBER OF ITERATIONS 

(INCREMENT THE PASS NUMBER 

IL00P7 



lYUP 

fCET MONITOR ADDRESS 

lir NONE 

ICO TO MONITOR 

I SAVE ROOM 

irOR 

tACTll 

(RETURN 



DZKHA.SRC 



r«ACyil.624 2ti«JAN«74 lOlOU PACt 25 
END or PASS ROUTINE 



118» 
1189 
1 190 
1191 
1 192 
1 19J 
1194 
1 19S 
1196 
1197 
1196 
1199 
1200 
1201 
1202 
120J 
1204 
1205 
1206 
1207 
1201 
1209 
1210 
1211 
1212 
1213 
1214 
1215 
1216 
1217 
1211 
1219 
1220 
1221 
1222 
122J 
1224 
1225 
1226 
1227 

122a 

1229 
12)0 
12J1 
1212 
121J 
1234 
1235 
1236 
12J7 
1239 
12)9 
1240 
1241 



.SBTTL 



SCOPE HANDLER ROUTINE 



0060)4 
0060J4 
006040 



006044 
006050 
006056 
006062 
006066 
006070 
006072 
006076 
006100 
OOfelOO 
00«104 
006106 
006112 
006116 
006124 
006126 
0061)2 
006114 
006140 
006146 
006150 
0061S6 
006164 
006170 
006174 
006202 
006206 
006210 



006212 
006212 
006216 
006222 
00»224 



0061)7 
100455 



006042 000416 



01) 746 
0127)7 
0057)7 
0126)7 
0004)6 
022626 
0126)7 
0004)6 

105717 
001404 

1050)7 
0050)7 

0) 27)7 
001011 
0057)7 
001406 
0052)7 

02) 717 
002012 
012717 
013737 
1052)7 
0116)7 

01) 737 
01)716 
000002 
000020 



0047)7 
1052)7 
001775 
0052)7 



177570 



000004 
006070 
177060 
000004 



000004 



001221 

001221 
001)00 
004000 

001216 

001222 
001)00 

000001 
006210 
001220 
001224 
001220 
001224 



007416 
001221 

0012)0 



000004 



001222 

001222 
001)00 



|*SW14*1 LOOP ON TEST 

|*Si«nBl INHIBIT XTEHATIONS 

(•THE TEST NUMBER (tTSTNM) IS INCR 
l*ANO THE ERROR FLAG CttRrLC) IS D 
ISCOPEi 

ROL f«SwR 
BMI lOVER 

(■••••START or CODE roR Th 
•XTSTRI BR 66 



SSI 



611 
2$l 

4SI 



177570 111 



ISI 

SSVLADI 



177570 IQVERl 



•MXCNTI 



MOV 

MOV 

TST 

MOV 

BR 

CMP 

MOV 

BR 

I •••• 

TSTB 

BEO 

CLRB 

CLR 

BIT 

■NE 

TST 

SCO 

ZNC 

CMP 

BSE 

NOV 

MOV 

INCB 

MOV 

MOV 

MOV 

RTI 

20 



f (ERRVECt-tSP) 
•5S*9^CRRVEC 

9*177060 
(SP}«>9*ERRVEC 
•SVLAD 
(SP)*,(SP}* 
(SP)«(f (ERRVEC 

• OVER 

•END or CODE rOR TNF 
•ERriC 
IS 

•ERrLC 
•TIMES 

• SHll»9*Si«K 
It 

• PASS 
1* 

• ICNT 

•TIMESf •ICNT 

• OVER 
•If^ZCNT 
•MXCNTiSTIMES 
•TSTNM 
(SPJf^LPADR 
•TSTNM. BfDlSPLAY 
•LPADR«(SP) 



EMCNTtD AND DISfLAYLD IN i;XSPLAY€7|0> 
ISPLAYED IN 0ISI'LAY<15i0a> 

(LOOP ON PRtSENT TEST? 

ItES ir ShMal 
E XOR TESTER^^^s^ 

lir RUNNlhC ON THE "XOR* lESTtR CHANCfc 

(THIS INSTRUCTION TO A "NOP' CNOP«240} 

I SAVE THE CONTENTS OF THE ERROR VECTOR 

(SET rOR TIMEOUT 

ITIME OUT ON XORT 

(RESTORE THE ERROR VECTOR 

(CO TO THE NEXT TEST 

(CLEAR THE STACK AETER A TIME OUT 

(RESTORE THE ERROR VECTOR 

(LOOP ON THE PRESENT TEST 
XOR TESTER^^^^a 

(HAS AN ERROR OCCURKEOT 

(BR ir NO 

(ZERO THE ERROR ELAC 

(CLEAR THE NUMBER OE ITERATIONS TO MAKE 
(INHIBIT ITERATIONS? 
(BR ir YES 

(ir riRsT PASS OF phocram 

( INHIBIT ITERATIONS 

(INCREMENT ITERATION COUNT 

(CHECK THE NUMBER OF ITERATIONS MADE 

IBR IF MORE ITERATION REQUIRED 

(REINITIALIZE THE ITERATION COUNTER 

(SET NUMBER Or ITERATIONS TO UO 

(COUNT TEST NUMBERS 

(SAVE SCOPE LOOP ADDRESS 

(DISPLAY TEST NUMBER 

irUDCE RETURN ADDRESS 

(FIXES PS 

(MAX, NUMBER UF ITERATIONS 



.SBTTL 



ERROR HANDLER ROUTINE 



(•SMtSai HALT ON ERROR 

(•SW13«1 INHIBIT ERROR TYPEOUTS 

(•CO TO aERRTYP ON ERROR 
•ERRORI 

JSR PCiEEDNH 
7SI INCB SERFLC 

BEQ 71 
INC SERTTL 



(SET THE ERKOR FLAC 

(DON'T LET THE FLAG CO TO ZEBU 

I INC THE ERROR COUNT 



MAINDEC-II'DZKHA-A 
DZKHA.SNC 



1242 


006230 


011637 


001340 


124J 


006234 


163737 


000002 


1344 


006242 


117737 


173772 


1249 


006390 


033737 


020000 


1346 


006396 


001004 




1247 


006360 


004737 


006302 


124S 


006264 


104400 


00130A 


1249 


006370 


A A A 4 %m 

009737 


« 4 4 A 9 A 

177570 


1 390 


006374 


1 00001 




1291 


006376 


000000 




1393 


006300 


000002 




1 393 








1394 








1399 








1396 








1397 








1358 








1299 








1360 








1361 


006303 






1363 


006303 


104400 


00 1 30 J 


126] 


006306 


010046 




1364 


006310 


009000 




1369 


0063 1 3 


i K 1 9 A n 

15 3700 


A A t ^ 1 & 

0012J6 


1 366 


006316 


A A 4 AAA 

001004 




1367 








1 360 


AAA 1 ^ A 

006320 


A 4 1 t A A 

0 1 J 7 46 


nm An 


1269 








1 270 


AAA 1 4 

006 J34 


fl A A A A ^ 

104402 




1271 


006326 


A A A A ■! A 

000420 




1273 


A A A 1 1 A 

006 J JO 


A A K 1 A A 
009 JOO 




127} 


AAA 111 

006 JJ3 


AAA 1 A A 

006 300 




1274 


006334 


AAA 1 A A 

006 300 




12"9 


006336 


AAA 1 A A 

006 300 




1276 


A A A ^ A A 


A A 9 9 A A 

002 7 0 0 


001 JOO 


1177 


A A A • A A 

006344 


At 4 A V 9 

012037 


AAA K A 

006 334 


1271 


0063S0 


A A 4 AAA 

001 404 




1279 


AAA O ■> 

006 193 


4 A A A A A 

104400 




1310 


AAA A 

006)94 


A A A A A A 

000000 




13il 


AAA SKA 

006 J96 


i A A AAA 

104400 


A A 4 lA 1 


1313 


AAA V A 4 

006 J62 


A • '9 A W 

0120)7 


AAA 1 Y 9 

000 J'2 


13* J 


A A A 1 & & 


A A t AAA 
001404 




1 3B4 


AAA V ^ A 
006 J '0 


4 A A A A A 
1 04400 




1319 


AAA 

006172 


A A A A A A 

000000 




1316 


AAA 

006 374 


4 A A A A A 
104400 


A A 4 1 A ■ 
001 JOi 


1 91V 
1 J»T 


AAA AAA 
000400 


A 1 f AAA 
Oil 000 




12tl 


006403 


001004 




1219 


006404 


012600 




1390 


006406 


104400 


001303 


1291 


006413 


000207 




1292 


006414 






1293 


006414 


011046 




1294 


006416 


104402 




1299 


006430 


009710 





>4ACY11,624 3il-JAN-74 
ERROP HANOLCK ROUTINE 



001240 
001236 
177570 



101 01 PACE 26 



261 



311 



MOV 

SUB 

MOVB 

BIT 

BNE 

J8R 

TYPE 

T5T 

BPL 

HALT 

RTX 



(SP)»IEKRAO 
•2>tCRRAD 
PIEHRADf IITLMB 
• Sl»ll#9tSMR 
31 

PC«9«IERRTYP 
••CDLr 

31 



iGtT ADDRtS& Ur CPRUR INSTRUCIIJ*> 

ISTHIC AND SAVE THE CRRUR ITE^ CCOC 

ISKIP TYPfcOUT ir StT 

(SKIP TYPEOUTS 

IGO TO USER EHMOM ROUTINE 

IHALT ON ERROR 
ISKIP IF CONTINUE 
iHALT Oh ERRQKl 



.SBTTL 



ERROP MESSAGE TYPEOJT ROUTINE 



|*THIS ROUTINE USES THE "ITEM CONTROL BYTE" (IITEMB) TO DETERMINE MHICH 
|«ERROP IS TO BE REPORTED. IT THEN OBTAINS* FROM THE "ERROR TABLE" (lERRTB), 
|*AND REPORTS THE APPROPRIATE INFORMATION CONCERNING THE CRROR, 

•EPRTYPI 





TYPE 


••CRLF 


{•CARRIAGE HETURN- 4 "LINE FEED" 




MOV 


ROi*(SP} 


ISAVE RO 




CLP 


RO 


IPICKUP THE ITEM INDEX 




BISB 


9«IIT£MB»R0 






BNE 


11 


lir ITEM RUMBER IS ZERO ONLY 
ITYPE THE PC OF THE ERROR 




MOV 


•ERRAD»«(8P} 


iSAVE lERRAD FOR TYPEOUT 
lERROR ADDRESS 




TYPOC 




ICQ TYPE»*OCTAL ASCIKALL DIGITS} 




BR 


88 


fCCT OUT 


111 


DEC 


RO 


1 ADJUST THE INDEX SO THAT IT MILL 




ASL 


RO 


1 WORK FOR THE ERROR TABLE 




A8L 


RO 






ASL 


RO 






ADD 


•tERRTB»RO 


IFORM TABLE POIRTER 




MOV 


(R0:**3* 


IPICRUP "ERROR MESSAGE" POINTER 




8CQ 


18 


ISKIP TYPCOUT IF NO POINTER 




TYPE 




fTYPE THE "ERROR MESSAGE" 


311 


.HOIID 


0 


("ERROR MESSAGE" POINTER GOES HERE 




TYPE 


*8CRLr 


(■CARRIAGE RETURN" & "LINE FEED" 


361 


MOV 


(R0)**4S 


IPXCKUP "DATA HEADER" POINTER 




BEQ 


SI 


ISKIP TYPCOUT IF 0 




TYPE 




ITYPC THE "DATA HEADER" 


411 


.MORD 


0 


|"DATA HEADER" POINTER SOES HLRE 


TYPE 


flCRLF 


("CARRIAGE RETURM" "LINE FEED" 


Stt 


MOV 


(R0)«R0 


IPXCKUP "DATA TABLE" POINTER 




BNE 


71 


IGO TYPE THE DATA 


611 


MOV 


(SP)».R0 


IPCSTORL RO 




TYPE 


»lCRLr 


{"CARRIAGE REIURN" "Ll^L FEtO" 




RTS 


PC 


IRETURN 


7tl 








MOV 
TYPOC 


f (R0}*f-(8P) 


ISAVE 8(R0)« FOR TYPEOUT 

iGO TYPL»-OCTAL ASCIKALL DIGITS) 




T8T 


(RO) 


lis THERE ANOTHLR NUMACHT 



MAINDi:C-U-02KMA*A 
DZKHA.SRC 



MACYtl,b24 3lf-JAM-74 lOlOl PACE 27 
CPFOR MESSAGE TVPLOUT ROUTINr 



1296 
1297 
12«f 
1299 
1100 
IJOl 
1)02 
1)0} 
1)04 
1)09 
1)0« 
1)07 
1)01 
1)09 
1)10 

1)11 

1)13 
1)1) 
1)14 
1)1S 
1)16 
1)17 
Dlfe 
1)19 
1330 
1321 
1)22 
132) 
1)24 
1)2S 
1)24 
1327 
1321 
1329 
13)0 
1)31 
1))2 
1))) 
1))4 
1))S 
1)36 
1))7 

13)1 
1339 
1340 
1341 
1342 
1343 
1344 
1349 
1346 
1347 
1)41 
1349 



006423 
006424 
006430 
006432 



006436 
006442 
0064S0 
006454 
006460 
006463 
006463 
006470 
006476 
006504 
006506 
006910 
006912 
006516 
006520 
006524 
006930 
0069)4 
006940 
006943 
006944 
006946 
006990 
006992 
006994 



001770 
104400 
000771 
020040 
006436 



017646 
116637 
112637 
062716 
000406 

1127)7 
112737 
1127)7 
010)46 
010446 
010946 
113704 
009404 
062704 
110437 
113704 
016609 
009003 
006109 
000404 
006109 
006109 
006109 
010903 



00643i 

000 



000000 

000001 006661 

006663 

000003 



000001 006661 
000006 00666J 
000009 006660 



00666) 

000006 
006662 
006661 
000012 



BEQ 6> 

TYPE t8» 

Bfi 7t 

.ASCIZ / / 
.EVEN 



ibP ir ho 

ITYPE TW0(2) SPACES 

ILOOP 

|TkO(2) SPACES 



.SBTTL 



BINARY TO OCTAL (ASCII) AND TYPE 



•1TYP08---ENTER HERE TO SETUP SUPPRESS ZEROS AND NUHBEP Of DICITS TO TlPl 
•CALL I 

NUM,«(SP) 



MOV 
TYPOS 
.BYTE 
.BYTE 



N 
H 



INUMBER TO BE TYPED 
ICALL rOR TYPEOUT 

|N«1 TO 6 rOR NUMBER OF DICIT^i TC 1 

IMBI OR 0 

liaTYPE LEADING ZEROS 
lOaSUPPHCSS LEADING ZbRUS 



••TYP0NO---CNTER HERE TO TYPE OUT *ITH THE 8AMI PARAMCTCRS AS THE LAST 
•STYPOS OR ITYPOCT 
•CALL I 



I* 


MOV 


NUM,-(SP) 


iNUMBER TO BE TYPED 


f • 


TYPON 




iCALL FOR TYPEOUT 


|*ITYPOCT — -ENTER HERE FOR TYPEOUT OF A 


10 BIT NUMBER 


|«CALLI 








I* 


MOV 


NUM«-(SP) 


1 NUMBER TO BE TYPED 


I* 


TYPOC 




iCALL FOR TYPEOUT 


•TYPOSI 


NOV 


•(SP),-(8P) 


1 PICKUP THC MODE 




MOVB 


l(SP}«IOriLL 


ILOAD ZERO FILL ttilTCH 




MOVB 


(SP)*«90M0DE*1 


INUMBER 0» DIGITS TO TYPE 




ADD 


•2»(SP) 


1 ADJUST RETURN ADDRESS 




BR 


•TYPOK 




•TYPOCTt 








MOVB 


• UtOFILL 


ISET THE ZERO FILL SNITCH 




MOVB 


•6*t0M00E4l 


ISET FOR SIX(6) DIGITS 


•TYPONI 


MOVB 


•9»I0CNT 


ISET THE ITERATION COUNT 




MOV 


R)#»(SP} 


ISAVE R) 




MOV 


M»*(SP) 


ISAVE R4 




MOV 


R9#«(8PJ 


fSAVE R9 




MOVB 


•0M00C«1*II4 


ICET THE NUMBER OF DIGITS TO TYPE 




NCG 


R4 






ADD 


• 6»R4 


ISUBTRACT IT »0R MAX, ALLOWED 




MOVB 


R4>S0M0DE 


ISAVE IT FOR USE 




MOVB 


•0FILL«R4 


ICET THC ZERO FILL SNITCH 




MOV 


12(SP}«R9 


(PICKUP THE INPUT NUMBER 




CLR 


R) 


ICLEAR THE OUTPUT MORD 


Itl 


ROL 


R9 


IROTATE MSB INTO "C" 




BR 


31 


IGO DO MSB 


2tl 


ROL 


R5 


IFORM THIS DIGIT 




ROL 


R9 






ROL 


R5 






MOV 


R9«R3 





MAINDEC-n-OZKHA«A 
DZKHA.SflC 



MACYllib34 2e-JAN«T4 iOtOl* PACt 3t 
BINARY TO OCTAL (ASCII) AND TYPt 



1350 


00*55* 


00*103 




311 


ROL 


P3 


1151 


00*5*0 


105337 


006662 




DECb 


•OMODE 


1J52 


00*5*4 


100016 






BPL 


71 


1353 


00*5** 


042703 


177770 




8IC 


•177770»P3 


1354 


00*573 


001002 






BNE 


41 


1355 


00*574 


005704 






TST 


P4 


135» 


00*57* 


001403 






BEO 


SI 


1357 


00**00 


005204 




411 


INC 


P4 


1351 


00**02 


053703 


000060 




BIS 


••0,P3 


1359 


00**0* 


052703 


000040 


5tl 


BIS 


• ' ,P3 


13*0 


00**12 


110337 


006656 




MOVB 




1361 


00**1* 


104400 


006656 




TYPE 




11»3 


00**22 


105337 


0066*0 


7f 1 


OCCB 


lOCNT 


1I*3 


00**2* 


003347 






BCT 


2$ 


13*4 


00**30 


002402 






BLT 


6f 


13*5 


00*ftJ2 


005204 






INC 


R4 


13*6 


00**34 


000744 






BP 


24 


13*7 


00**3* 


012*05 




*ll 


MOV 


(SP)«,R5 


13*1 


00**40 


012*04 






MOV 


(SP)«.R4 


13*9 


00**42 


012603 






MOV 


(SP)*»R3 


1370 


00**44 


016666 


000003 000004 




MOV 


2C8P)»4(8P) 


1371 


00**52 


012616 






MOV 


(SP>*,(SP) 


1372 


00**54 


000002 






PTI 




1373 


00**5* 


000 




• •t 


.BYTE 


0 


1374 


00ft*S7 


000 






.BYTE 


0 


1375 


00***0 


000 




SOCNTI 


• BYTE 


0 


137* 


00***1 


000 




toriLLi 


.BYXC 


0 


1377 


00*b*2 


000000 




lOMODCI 


0 





lOLT LSb or THib oic;ii 

ITYPE THIS UIUITT 

IBH IF NO 

ICET RID or JUNIi 

I TEST I'OP 0 

ISUFPMESS THI!> 07 

ibR ir YES 

IDON'T SUPPHE&S ANYMORE O'S 
fHAKE THIS DIGIT ASCII 
IMAKE ASCII IF NOT ALREADY 
ISAVE rOR TYPING 
fCO TYPE THIS DIGIT 
ICOUNT BY 1 
IBR ir MORE TO DO 
IBR ir DONE 

UNSURE LAST DIbIT ISN'T A BLANK 
IGO DO THE LAST DIGIT 
I RESTORE R5 
IRESTORE R4 
IRESTORE RS 

ISET THE STACK rOR RETURNING 
(RETURN 

ISTORACE rOP ASCII DIGIT 
ITERMINATOR FOR TYPE ROUTINE 
lOCTAL DIGIT COUNTER 
IZERO riLL SWITCH 
fNUMBER or DIGITS TO TYPE 



MAINDEC-11«DZKHA-A 
DZKHA.SPC 



MACyil,b24 2H-JAN-74 IO1O8 PACl 39 
BINARY TO OCTAL (ASCII) AND TYPE 



137S 






1 JT9 






1 J80 






1391 






1 JI2 






1 J8i 






1314 






1J85 






1316 






1317 


006664 




13lt 


006664 


010046 


1389 


006666 


010146 


1390 


006670 


010246 


1391 


006672 


010346 


1392 


006674 


013700 


1393 


006700 


013701 


1394 


006704 


012703 


1395 


006710 


O0SO02 


1396 


006712 


006300 


1397 


006714 


006101 


1398 


006716 


006102 


1399 


006720 


005203 


1400 


006722 


001373 


1401 


006724 


063702 


1402 


006730 


005501 


1403 


006732 


063701 


1404 


006736 


005502 


1405 


006740 


062700 


1406 


006744 


005501 


1407 


006746 


005502 


140S 


006750 


062701 


1409 


006754 


005502 


1410 


006756 


062702 


1411 


006762 


060200 


1412 


006764 


005501 


1413 


006766 


010037 


1414 


006772 


010137 


1415 


006776 


012603 


1416 


007000 


012602 


1417 


G07002 


012601 


1418 


007004 


012600 


1419 


007006 


000207 


1420 


007010 


176543 


1421 


007012 


123456 


1422 






1421 






1424 






1425 






1426 






1427 






1428 






1429 






1430 






1411 


007014 


010046 



I !•••••< 

.SBTTL 

I •CALL I 

!• 

!• 

!• 

»• 

•HANOI 



007012 
007010 
177771 



111 



007012 
007010 
001057 

047401 

000006 



007012 
007010 



8HINUMI 
8L0NUNt 





RANDOM hUMBtR 


CLNEPATOR ROUTINE 




J8R 


PC»lRAN0 


(CALL THE ROUTINE 




RETURN 




(RETURN HERE THE PANOOH 






(NUMBER MILL BE IN 








||HINUH>ILONUM 




MOV 


R0,-(SP) 


(PUSH RO ON STACK 




MOV 


R1*-(SP) 


IKUSH Rl ON STACK 




MOV 


R2««(SP; 


IPUSH R2 ON STACK 




MOV 


R3*-(SP) 


IPUSH RJ ON STACK 




MOV 


8LONUM,F0 


ISET RO WITH LOW 




MOV 


• HINUr'.Rl 


ISET Rl MITH HIGH 




MOV 


•-7,RJ 


ISCT SHIFT COUNT 




CLR 


112 


(ZERO R2 




ASL 


HO 


iSHirT RO LEFT AND 




ROL 


Rl 


IROTATE CARRY II.TC PI 


AND 


ROL 


R2 


(ROTATE CARRY INTO R3 




INC 


R3 


(CHECK FOR DONE 




BNC 


18 


. (CONTINUE SHIFT LOOP 




ADD 


8L0hUM,R2 


(ADO NUMBER TO MAKE X 


U9 


ADC 


Rl 


IPROPOCATE CARRY 




ADD 


8HINUM,R1 


(ADD NUMBER TO MAKE X 


139 


ADC 


R2 


IPROPO6ATC CARRY 




ADO 


•1057, RO 


(ADD LON CONSTANT 




ADC 


Kl 


IPROPOCATC CARRY 




ADC 




tPROPOCATE CARRY 




ADD 


»«**ei,Ri 


(ADD HIGH CONSTANT 




ADC 


n2 


IPROPOCATE CARRY 




ADD 


• 6*R2 


(ADD HIGHEST CONSTART 




ADD 


R2«R0 


(RCPRIME RO WITH HIGHEST DIGIT 


AOC 


Rl 


(PROPOCATE CARRY 




NOV 


ROtSLONUH 


(SAVE RO 




MOV 


R|,8NINUN 


ISAVC Rl 




NOV 


(•P}*#RJ 


(POP STACK INTO R3 




MOV 


(SP)«>R2 


(POP STACK INTO R2 




NOV 


(SP}*.R1 


(POP STACK INTO Rl 




MOV 


(SP}«fRO 


(POP STACK INTO RO 




RT8 


PC 


1 RETURN 




• HORD 


176543 






.WORD 


12)456 







.SBTTL 



TRAP DECODER 



(•THIS ROUTINE WILL PICKUP THE LOMER BYTE OF THE "TRAP" INSTRUCTION 

(•AND USE IT TO INDEX THROUGH THE TRAP TABLE FOR TME STARTING ADDRESS 

(•OF THE DESIRED ROUTINE. THEN USING THE ADDRESS OBTAINED XT NXLL 
{•CO TO THAT ROUTINE, 



8TRAP1 MOV 



ROf •(SP) 



iSAVE RO 



•<AXNDkC«ll«DZKHA«A 
DZKHA.SRC 



1 4 J3 


00701b 


A « A A A A 

0 1 6oOO 


I il 1 1 


00702<c 


A A & ^ 4 A 

003 740 


m A % A 


007 074 


• 4 • A A A 

111000 


1 A 1% 


A A ^ A ^ ^ 

00 / 0 / 1* 


A < & A A A 

0 X 0000 


I 4 JO 


MA 'I A 19 

00 f V 3d 


A A A? A A 

000*00 


t A \ t 

14 37 






« A !■ 

I 4 






1 4 J9 






S 440 






1441 






1442 






t A A 1 
1 44 J 






1 






t A A ft 

1443 






14 40 


A n ^ A 1 A 
no / 0 J 4 


A A 1 1 1 A 


144' 


0 0 7 0 JO 


A A & A & 7 


tAAA 


00 '040 


A A A A Ilk 
O OO 4 JO 


144* 


A Alf nA^ 
00 r 04« 


A A& 47 Ik 
0 OO 4 ' D 


4 A ft n 
149C 






4 Aft t 

1 49 1 






• Aft '9 

1 492 






4 Aft 1 

1 49 J 






4 Aft A 






4 Aftft 


00 ' 0 


A 1 97 17 

0 1 C r J r 


4 Aftik 

1 490 


n A7 n% 7 


01 77 17 

0 J 4 ' J f 


t Aft7 
1 49 f 


A A 1 AA n 

U 0 r 0 V U 


A 1 n A4lk 
0 1 0 U 4 D 


4 A ft Q 

1 43 ■ 


A n 1 Alk 1 
0 u r OO • 


A 1 A 1 4fk 
0 1 0 1 40 


4 AftO 
i 49* 


A A 7 Alk A 
U V ' 0 V V 


A 1 A 7 4 li 
U 1 0 4 ^ V 


• 40 V 


V w r W OO 


010 146 


t AAA 
« 40 i 




0 1 0 A46 


1 0D2 


A A7 A7 7 

00 r 0 r 4 


A t 04 46 
O i U 3 40 


4 AA 1 

1 40 J 


An7 n7 A 


01 0617 


4 AA A 
1 404 


A A7 f A A 

00 r 1 00 


A1 97 17 

0 I 4 » J r 


4 Aftk 

1 409 


A A7 1 AA 

00 ' i oo 


0 A 0000 
U U wO O U 


« AAA 
1 4O0 


A A7 1 1 A 

0 0 r 1 1 0 


A A A7 76 

W V V ' 'V 


1 40 1 






1 AAB 






\ AAQ 

1 4oy 


AAl 1 13 


01 1706 
V 4 J ' vO 


1 4 » V 


V V ' i 4 V 


001^0 17 


t A7 4 
1 4 ' 1 


0071 79 


OOS 7 1 7 
U v3 4 J ' 


I 4 » A 


007 1 


001 174 


» 4 f J 


007 1 )0 


01 3604 


I 4 » 4 


0071 12 


0 13604 

w • • O V ^ 


1 47% 
I 4 f B 


007 1 %A 


01 9601 

W 4 40 W # 


1 47 A 
1 4 r O 


0071 tft 


01 9603 
V I 4 O U4 


4 477 
14'' 


A07 1 AO 


0 1 960 1 
W 1 40U 1 


1471 


007142 


01 2600 


1479 


007144 


012737 


1410 


007153 


012737 


1411 


007160 


104400 


1412 


007164 


012716 


MIJ 


007170 


000002 


1414 


007172 


000000 


1415 


007174 


000776 



MACyil«»24 2li»JAh*74 lOlOK PACi JO 
TRAP DECODER 



000002 


"CV 


3CSP).»0 


lUtT TPAP AUDPtSS 




T5T 


•IPO) 


IbACPUP BY i 




t«OVB 


(PO)*PO 


tCET RIGHT BYTL Of TPAP 


007014 


f«OV 


•TPPAO(H0)iP0 


llNOEX TO TABLE 




RTS 


PO 


ICO TU ROUTINfc 



.SPTTL TPAP TABLE 

{•THIS TABLE CONTAINS THE STAPTINC ADOPESSES OF THF ROUTINES CALLLD 
(•BY THE ■TRAP" ISSTPLCTIOM, 

> POUTIVE 
I 

STPPADI tTYPE 

•TYPOCT 
•TYPOS 
tTYPON 

I {••••000004000 

iSBTTL POKER DUbN AND UP ROUTINES 

IPOMCR DOKN ROUTINE 



007172 


000024 


IPNRDNI MOV 


■ttLLUP»B«PrtRVEC 


ISET rOP FAST UP 


000)40 


000036 


NOV 


•)40f 9«PWPVtC*2 


IPPI0I7 






NOV 


PO*-(SP} 


IPUSM RO ON STACK 






MOV 


Pl#»tSP) 


IPUSH PI ON STACP 






MOV 


P2.-(SP) 


IPUSH P3 ON STACK 






MOV 


PJ««(SP) 


tPUSH RJ ON STACK 






MOV 


P4f -(SP) 


IPUSH R4 ON STACK 






MOV 


Pb«>(SP) 


IPUSH P» UN STACK 


007176 




MOV 


SP»«SAVfi6 


ISAVE SP 


007112 


000024 


MOV 


■ IPi(RUP*PlP)>RVEC 


ISET UP VLCTOK 






HALT 










BR 


.-2 


friANG UP 



iPOtaER UP ROUTINE 



007176 




SPKRUPt 


MOV 


•SAVR6.SP 


ICET SP 




007176 






CLP 


■SAVP6 


»wAlT L00t» »0R IHt TTY 




007176 




161 


INC 


•SAVP6 


IhAIT rOR THE INC 










BNE 


IS 


tor WORD 










MOV 


(SP}*«P» 


IPOP STACK INTO Rft 










MOV 


(SP)4»R4 


IPOP STACK INTO R4 










MOV 


(SP)«*RJ 


IPOP STACK INTO R3 










NOV 


(SP}««R2 


IPOP STACK INTO R2 










MOV 


(SP)*,R1 


IPOP STACK INTO Rl 










MOV 


(SP)**R0 


IPOP STACK INTO RO 




007044 


000024 




MOV 


ISPWRO*<«iiPNRVEC 


ISET UP THE POHIR DOWN 


VECTOR 


000J4O 


000036 




MOV 


•340iBtPHRVLC*3 


|PRI0|7 




011464 






TYPt 


» POKER 


|POt«ER »AIL MESSAGE 




005542 






MOV 


•STAR*(SP) 


1 RESTART kl STAR 










RTI 












IXLLUPI 


HALT 




ITHL POhLP UP SEQUENCE 


l»AS STARTED 








BR 


.-2 


t BEFORE THE POMEH OOoN 


MAS COMPLETE 



iCALLoTYPE TRAP^O ( 1 04400 ) TTY TYPLOUT PUOTINE 

iCALLoTYPOC THAP*2 ( 1 04402 ) TYPE OCTAL NUMBER {«ITH LLADINC 

iCALLoTYPOS TRAP*4( 104404} TyPL OCTAL NUMBER (NO LbADiNC ZE 

iCALLaTYPON TP AP*6 ( i 04406 } TYPE OCTAL MU^'BEP (AS PEP LAST C 



N>INDEC-11-0ZKHA-A 
OZKHk.SRC 



MACYU«fe24 2S-JAN-74 lOlOb 
POMEP OOhN AND UP ROUTINES 



1 4i0 


A A 9 4 9& 

OV 7 170 


A A A A A A 

oooooo 




t 4 A ^ 








4 A A O 

1 4 ■ V 








1 4^ ■ O 

1 f i 9 








• ABA 

1490 








1491 








1 492 








1 AO t 
1 49 J 


A A7 9 AO 


A 1 9 7 Aft 
0 1 A r OO 


A A 1 1 A A 
W O 1 1 O V 


1 494 


A A 7 9 A A 


1 1 4 ' J ' 


A A A A A 1 

00 OOU 1 


1 49D 


A A 9 9 t 


A n A A A A 

00 0000 




1 49P 


A AY 9 1 A 
UU7 214 


1 1 1900 
1 1 J 7 UO 


1 994 90 


1 4 » ' 


009330 


001 003 






009333 


0001 19 


001 AAft 

W W 4 W V 


1 499 


nA993fe . 
00 ' «#o • 


A A A AO A 




4 Ik An 


A n9 3 1 A 

U U r A J O 


0 t 17 17 

W 1 J r J r 


1 77970 


1 « A 1 

i 3 w 1 


009 3 1ft 


0A3700 

V 9 • f W V 


1777ft 1 


1 9 U « 


007 243 


Oft37 00 

W 4 » VV 


007 294 

V W ' 4 * ^ 


1 3 V J 


A07 3 Aft 


0001 7 0 
WW V 1 ' W 


AAA AAA 
W VV w W W 


1 4 n A 

« 3 U 4 








4 3 W J 


007392 


000000 

V W V V W V 




1 40ft 


007 34 A 

WW r # 7 V 


001 




1407 


00739ft 


004S10 

V V ^ w • W 




1 40fl 


007340 


00A47ft 




1909 

A ^ V w 


007262 


007274 






007364 


007304 




19*1 


W r ADO 


0041 00 

W V 7 ^ V V 




4 9 i • 


A0737fl 


00901ft 

W W 9 V V w 




14 11 


007373 


007 lift 




1 4 1 A 
















1 4 1 








1417 








A ^ A V 








1919 








1S20 

• • w 


007274 


012737 


000001 


1S21 


007302 


000403 




1933 


007304 


012737 


000002 


• * • J 


007312 


0001 37 


004714 


1 4 3 A 

1 7 • ^ 








1 929 








1436 
















1 43B 
1 7 « V 








i%aQ 








1 4 )fl 


007 11 A 


1 1 3717 


177470 

A ' ' 9 r V 


14 11 

1 9 ' 1 


no7 13A 


0437 17 
V ^ • r J r 


1 77770 

Iff r r w 


I a J < 


007 113 

V V f 9 3m 


111717 
1 1 J ' J ' 


001370 
V V ( • 'V 


X533 


007340 


112737 


000074 


1334 


007346 


113737 


177570 


1535 


007354 


006037 


001270 


1936 


007360 


006037 


001270 


1537 


007364 


006037 


001270 


1538 


007370 


042737 


177760 



tSAVR6l 0 



NTH! 



001107 



111 



004500 



NTHFI 
NTHFPl 



005024 
005024 



NTr2l 

NTr3l 
NTr3*l 



001270 
001270 
011940 
011541 

001270 



001270 



NTr4l 



MOV 

HALT 

MOVB 

BNE 

JMP 

HALT 

MOV 

BIC 

ADD 

JMP 

00000 

START 

NTFO 

MTFl 

NTr2 

NTFS 

XNUNC 

XNNOR 

NTF4 



MOV 
BR 

MOV 
JMP 



NOVB 

BIC 

MOVB 

MOVP 

MOVS 

ROP 

ROR 

ROR 

BIC 



PAGL 31 



(PUT THt SP HtRL 



I 

|N0 TERMINAL HANDLER 

ICNTER HERE TMOn START AT 210 

I 

•1100, SP ISKT UP STACK POINTER 

■1. STPFLC fREMEHBLR WL HAVE NO TERMINAL 

IWAITE FOR OIRECTIVL 
SiKR. RO ISAVC DIRECTIVE FOR LIST 

U I IF HE MANTEO TO START TESTING 

START IDON'T MALT AGAIN 

fNAXT MERE FOR ADDRESS 
S«(R* NINP ISTORE ADDRESS 

•17776li RO iMAKE SURE HE DIN'T CIVL ME BAD DIRECTIVE 

•NTHFP* RO ICET READY TO CO TO A PLACE THAT 

9(0) ITHAT WILL TAKE CARL UF DIRtCTXVE 

iDXRECTIVt POINTER 
iSHRaO START TESTING 
ISWRM2 INPUT MOOULt ADR« 
|8MR«4 ENTER OUTPUT MODULE ADR. 
ISMRB6 ENTER 1ST CROUP VLCTER ADR, 
ISNRSIO ENTER 2ND CROUP VECTER ADR. 
|SWR*12 UNCONNECT MODULES 
tSWRai4 MAKE NORMAL CONNECTIONS 
|8HRai6 CONNECT TMO MODULES (SOFT) 
INOTEI INPUT MODULE • IN SMR 0-2 
I OUTPUT MODULE • IN SKR i-6 



1 

ITMIS ROUTINE HANLOeS IMPUTING VECTORS 
t 

•It XNVETT lENTER VECTOR FIRST GROUP 

NTFBA IBRANCH AHEAD 

•2* INVETT lENTER VECTOR SECOUND GROUP 

NTF3B I NOW CO TO NORMAL ROUTINE THAT TAKES CARE OF IT 

I 

ITHIS ROUTINE HANDLES CONNECTING 2 MODULES MITH NO 

I TERMINAL BY SETTING OP INPUT BY SMR TO LOOK 

I LIKE INPUT FROM A TTY THEN TRANSFERRING TO NORMAL 

I ROUT! ME 

I 

SMR, ITHPO iCET SMR 

•177770f ITMPO IFORN INPUT MODULE • 

•TMPOi TTYINB IFUDCE IT TO LOOK LIKE IT 

•74, TTYINB^l iCAME FROM TTY INPUT 

SnR, ITMPO ICET SMR 

ITMPO IFORH OUTPUT NODULE • 

ITMPO 

ITMPO 

•l77760f ITMPO IMAKE IT LOOK LIKE 



MAINOeC-n-DZKHA-A MACYil.»24 2I-JAN-74 lOlOt PACE J2 

DZKHA.SPC POtaEH DOriN klf) UP ROUTINES 

15J9 007J7ft 11J737 001270 01iS42 KOVB tJfPO, TTYINh^S iTTY INPUT - THEN 



MAXNDLC-11-DZKHA>A MACyn.l»24 2H-JAK-74 lOlOb PACK. 33 

DZKHA,Sf)C POkER DOlh AND UP KOUTIftCS 



1940 


007404 


012737 


011540 011534 




MOV 


•TTYlNBiTTYl^P 


ICQ TO POUTlNt THAT HANDLtS TTY 


1541 


007412 


0001 J7 


005130 




JMP 


siNCr 


(INPUT POP SINCLL CONNECTIONS 


1»42 
















154} 












IfcPPOP HANDLED 


DOES OUTPUT TERMINAL EXI&TT 


1544 
















1545 


007416 


005037 


177776 


EEDNHI 


CLP 


PSh 




1546 


007422 


1057J7 


00110'' 




TSTB 


•TPFLC 


tOOES TTY EXISTT 


1547 


007426 


001001 






BNE 


21 




1941 


00'4JO 


000207 




111 


UTS PC 




IYF5-EX1T 


1549 


007412 


032737 


020000 177570 


211 


BIT 


• SMDifiSitP 




1590 


007440 


001371 






BNE 


11 




1531 
















1552 


007442 


01U37 


001240 




MOV 


(SP}» lEPPAO 


ICET ADDRL8S OF CRROP CALL 


155) 


007446 


162737 


000002 001240 




SUB 


12. ICBRAD 




1594 


007454 


117737 


171560 001236 




HOVB 


BlERHADySXTEXB 


tCET NUMBER or ERROR 


1555 


007462 


0052)7 


001230 




INC 


lERTTL 


llNCCRROR COUNT 


1556 
















15S7 


007466 


000000 






HALT 




IAN EBBOR HAS OCCURID AhD 


155B 


007470 


000240 






NOP 




INO OUPUT TERMINAL EXISTS 


1559 


007472 


062716 


000004 




ADD 


•4* (SP} 


irOLLOM THE PROCEtDURL IN SECTION 6*1 


1560 


007476 


000002 






PTX 




IDOCUNENTATION TO SEE WHAT LRROR OCCUREO 


1561 
















1562 












I 




1563 












(THIS ROUTINE 


PRINTS "END PASS" IF ENABLED 


1564 












1 




1565 
















1566 


007500 


105737 


001107 


EOPTI 


TSTB 


•TPrLC 


ISEE IP XE HAVE OUTPUT TERMINAL 


1567 


007504 


001006 






BNE 


11 


lIF NOT DON'T PRINT END OF PASS 


1S6I 


007506 


032737 


002000 177570 




PIT 


•2000, S»R 


ISEE IF HE INHIBITED END PASS TXPEOUT 


1S69 


007514 


001002 


> 




BNE 


11 


IBY SETTING BIT 10 IN Si>R 


1570 


507516 


104400 






TYPE 






1571 


007520 


011423 






MEOP 






1572 


007522 


000207 




111 


RTS 


PC 


tEXIT 



MAINDEC*n-DZKHA-A 



MACiril.fe24 2b-JAN-74 lOlOH PACt J4 





SBC 




POkCR DOHN AND 


UP ROUTIKCS 
















I J ' * 


V U r 9 A V 


001240 

W W 1 « V w 


001242 


001344 


DTll 






W ' 9 9 m 


001 

W W A • ^ w 


001250 


000000 








007940 


001240 


001243 


001244 


DT2I 


.«ORD 


14 77 


0079 Aft 


001 270 

W W A • 'V 


000000 








1 97f 


C07SS3 

V V ' m 9 m 


001 240 

V W A ■ ^ W 


001270 


001242 


DT3I 


.WORD 


14 79 


0079ft0 


001244 


000000 








1510 


007564 


001240 


001354 


001296 


DT4I 


,WOPD 




007572 


001260 


001262 


000000 






i ^ • • 


007600 


001240 


001270 


000000 


DT9I 


,MOPD 


* * • * 




000000 






DT6aO 




1 4i4 

A 3 V ^ 




000000 






DFlaO 




1414 














A 9 *V 














A * • ' 














A ' • » 


007606 


00501S 


042533 


042116 


CMll 


(ASCIZ 


1 4iQ 


007614 


05 1 055 


041905 


042911 






A ^ ' V 


007623 


042926 


042040 


092101 






1491 

A J ' • 


007630 


020101 


051105 


047522 






1492 


0(i7fc3fc 

V V ' V ^ 9 


000122 










1 99 J 


007640 


005015 


047111 


093920 


CM2I 


(ASCIZ 


1 994 


007646 


0201 24 

V • V A * ~ 


047515 


092504 






1999 


007694 


042514 


043040 


044501 






t 99ft 


007662 


042514 


020104 


047524 






1997 


007670 


044440 


052116 


051105 








007676 


052522 


052120 


000 






A if 7 7 


007703 


015 


044412 


050116 


CM3t 


.ASCIZ 


1600 


007710 


052125 


046440 


042117 






1601 


007716 


046125 


020105 


047111 






1 602 


007724 


042524 


051122 


050135 






1603 


007732 


042524 


020104 


052101 






1604 


007740 


053440 


047522 


04S516 






1605 


007746 


050040 


044522 


091117 






1606 


007794 


0521 1 1 


000131 








1607 


007760 


OOSOIS 


09492S 


093133 


EN4t 


•ASCIZ 


1601 


007766 


046505 


044440 


044516 






1609 


007774 


044524 


046101 


055111 






1610 


010002 


020105 


040906 


046111 






1611 


010010 


042105 


092040 


020117 






1612 


010016 


046103 


040909 


020132 






1613 


010024 


047111 


093920 


020124 






1614 


010032 


047515 


093904 


043514 






1615 


010040 


000 










1616 


010041 


015 


043012 


040535 


EM9t 


.ASCIZ 


1617 


010046 


0201 14 


043101 


091104 






1611 


010054 


051505 


03013J 


091109 






1619 


010062 


047522 


000122 








1620 


010066 


005015 


047111 


043924 


EM6l 


.ASCII 


1621 


010074 


051122 


090139 


091924 






1622 


010102 


047440 


092129 


047440 






1623 


010110 


020106 


091117 


042904 






1624 


OlOlU 


026122 


091440 


047910 






1639 


010124 


046125 


020104 


042902 






1636 


010112 


072 











• LPHADt«CDADPtl9DADH,aC00AT,<f»D(}ATf 0 
•KRPADt ICDADP. lbDAOH>lTMPO,0 
•EPPAD >i TMPC »ICDADR> ISO AOPrO 
■LPPAD>IHECO>|PECl>IRCC2.lPECi.O 
•EPPADiiTMPOrO 

lASCII MESSAGL5 



.ASCIZ <15><12>/INPUT MODULE FAILEC TO INTEPHUPT/ 



.ASCIZ <19><12>/INPUT MODULE INTLPRUPTED AT mPONC PPXOPITY/ 



.ASCIZ <l9><12>/SySTbM INITIALIZE FAILED TU CLLAP INPUT KODULE/ 



.ASCIZ <19><12>/DUAL ADDRESS ERROR/ 



.ASCII <19><12>/IRTEPPUPTS OUT OF UPOEK» SHOULD BEI/ 



MAINDEC-n*OZKHA»A 
DZKHA.SPC 



HACY11.634 3S«JAK*74 lOlOD PACE J9 
POMER DUhN AND UP ROUTINES 



1627 


010133 


015 


044412 


092116 


163t 


010140 


0M1C5 


03706J 


047111 


1639 


010146 


042934 


032122 


044476 


16J0 


010194 


052116 


091105 


037061 


1691 


010162 


047111 


042524 


031122 


1633 


010170 


000 






1633 


010171 


015 


044413 


044916 


1634 


010176 


044934 


046101 


055111 


1635 


010204 


030105 


040506 


046111 


1636 


010212 


043105 


052040 


020117 


1637 


010220 


046103 


040505 


020122 


1638 


010226 


047111 


051124 


020056 


1639 


010234 


047105 


041101 


042514 


1640 


010242 


041040 


052111 


000 


1641 


010247 


015 


047012 


020117 


1642 


010254 


047503 


047116 


041505 


1643 


0103*2 


044534 


047117 


020123 


1644 


010270 


040915 


042904 


000 


164S 


010375 


019 


047012 


020117 


1646 


010302 


047111 


092520 


020124 


1647 


010310 


047515 


052504 


042914 


1641 


010316 


040440 


042104 


027122 


1649 


010324 


043440 


052116 


051105 


1650 


010332 


043105 


000 




1651 


010335 


019 


047012 


0201ir 


1652 


010342 


053517 


050124 


052125 


1653 


010350 


046440 


042117 


046125 


16S4 


010396 


030105 


042101 


051104 


165S 


010364 


020096 


047109 


042924 


1656 


010372 


042533 


000104 




1657 


010376 


009015 


042926 


092103 


1658 


010404 


051117 


040440 


042104 


1659 


010412 


037133 


047040 


052117 


1660 


010420 


043440 


052116 


05110:> 


1661 


010426 


042105 


043040 


051117 


1662 


010434 


044440 


090116 


053129 


1663 


010442 


046440 


042117 


046125 


16*4 


010490 


024109 


02492J 


044440 


l»ft5 


0104S* 


020116 


04790J 


047116 


166ft 


0104*4 


041909 


044924 


047117 


1667 


010472 


091490 


000091 




1666 


010476 


009019 


051 105 


047922 


1669 


010504 


020122 


020040 


042101 


1670 


010512 


091104 


020040 


020040 


1671 


010930 


042101 


051104 


020040 


1672 


010926 


020040 


040504 


040924 


1673 


010914 


020040 


020040 


040904 


1674 


010942 


040924 







• ASCIZ <19><13>/INT^P)>INTtP4>INTtPi>INT( P^/ 



lASCXZ <19><12>/INXTIALIZE FAILED TO CLEAR INTH. tNABLL UIT/ 



tASCXK <15><12>/N0 CONNECTIONS NAOL/ 



, ASCIZ <15><12>/N0 INPUT MODULE ADDR . LNTEHED/ 



tASCIZ <15><12>/N0 OUTPUT MODULE ADDR. ENTtRED/ 



.A8CXZ <19><12>/VeCT0R ADDR. NOT CNTERCD FOR INPUT MOOULttS) IN CONNtCTXON(S)/' 



(ASCII <19><I2>/rRROR ADD* ADDR DATA DATA/ 



«I*INDEC-U*DZKHA-A MACY11.»34 3«-JAN-74 lOlOB PACL J» 

DZKHA.SRC POmER DOWN AND UP POUTIkES 



1079 


010544 


005015 


041530 


020040 




1676 


0105S3 


030040 


020040 


092517 




1677 


0105*0 


020134 


030040 


030040 




U7I 


0105** 


047111 


030040 


030040 




1679 


010574 


030040 


054105 


033520 




1610 


010*03 


030104 


030040 


047111 




1611 


010*10 


000 








1613 


010*11 


015 


043413 


051132 


DH2I 


16IJ 


010616 


051117 


030040 


040440 




1664 


010*34 


043104 


030132 


030040 




1615 


010*13 


040440 


043104 


030132 




1616 


010*40 


030040 


050040 


047532 




16I7 


010*46 


133 








1611 


010647 


015 


050012 


02010J 




1619 


010*54 


030040 


030040 


047440 




1690 


010**3 


053125 


030040 


030040 




1691 


010*70 


044440 


03011* 


030040 




1693 


010*7* 


030040 


051440 


040534 




1693 


010704 


000124 








1694 


010706 


OOSOIS 


051105 


047533 


DH3I 


1695 


010714 


030133 


030040 


043101 




169* 


01C733 


051104 


030040 


030040 




1697 


010730 


043101 


051104 


030040 




1699 


010736 


030040 


043101 


051104 




1699 


010744 


005015 


041530 


030040 




1700 


010753 


030040 


030040 


053517 




1701 


0107*0 


030124 


020040 


020040 




1703 


0107** 


047111 


020040 


020040 




170J 


010774 


020040 


0S2S04 


04*101 




1704 


011003 


000 








1705 


011003 


015 


042412 


051122 


DH4I 


1706 


OllOlO 


051117 


020040 


044440 




1707 


01101* 


05311* 


051105 


0200*1 




1701 


011034 


044440 


05311* 


051105 




1709 


011033 


0200*2 


044440 


05211* 




1710 


011040 


OSllOS 


0*3 






1711 


011043 


015 


050012 


020103 




1712 


OllOSO 


020040 


020040 


040440 




171S 


01105* 


042104 


020122 


020040 




1714 


0110*4 


040440 


042104 


020122 




171S 


011073 


020040 


040440 


042104 




1716 


011100 


000122 








1717 


011103 


005015 


051105 


047522 


DHSt 


1711 


011110 


020122 


020040 


042101 




1719 


011116 


051104 








1730 


011130 


005015 


041520 


020040 




1731 


01113* 


020040 


020040 


047111 




1722 


011134 


051124 


000 






172J 


011117 


015 


050012 


047522 


DH7t 


1734 


011144 


051107 


04*501 


047040 




1735 


011153 


053117 


051040 


047125 




1736 


0111*0 


04451* 


04351* 


020040 




1737 


0111** 


000 








1731 


0111*7 


040 


057040 


000103 


MCONCt 



,A5CIZ <J5><12>/PC OUT IN tXH'l) IN/ 

.ASCII <l»><12>/EPi)0P ADCP ADDP PROS/ 

.ASCIZ <1S><12>/PC OUT IN STAT/ 

•ASCII <15><12>/CPP0P ADDR ADDP ADtR/ 

«ASCIZ <15><12>/PC OUT IN DUAL/ 

•ASCII <1S><13>/EPP0P INTCPl INTEP2 INTERS/ 

•ASCIZ <15><12>/PC ADDR ADDR ADDR/ 

•ASCII <15><12>/ERROR ADDR/ 

•ASCIZ <15><12>/PC INTR/ 

.ASCIZ <15><12>/PR0CRAM NOT RUNNING / 

.ASCIZ / *C/ 



MAINOCC-n»OZKHA-A •'ACyil.b34 3a-JAN-74 lOiOB PACL i^ 

DZKHAfSHC POWER DOi<N AND UP ROUTINES 



17 39 


0111 74 


0001 14 






MhSt 


(ASCIZ 


/\/ 


f 7 10 


011176 


009015 


000 




HCRLFI 


( ASCIZ 


<15><12>// 


1 ' J 1 


011301 


019 

V A J 


047 413 


0431C4 


NODADFI 


fASCIl 


<1S><13>/0D1; *DDPESS*NOT ACCLPTtD/ 




Oil 30ft 
w 1 A J VO 


040440 


043104 


043532 








17 11 


011314 

V A A # A ~ 


09 1 93 1 


047055 


0521 17 










VI A * * • 


040440 


04150 J 


050105 








1 7 IS 


011310 

V A A • ' V 


043934 


000104 










1 7 1& 


011314 
V A A • J V 


009019 

V V 9 V A ^ 


047515 


052504 


MMHOI 


(ASCIZ 


<15><13>/>*0DULC NO AODPESS FUNCTKN 


17 17 


Oil 343 


04391 4 


047040 


030117 

U # V A A ' 










nil 3S0 

V A A V 


04O44O 


043 1 04 


042522 








(lis 


Ol 139ft 


091921 


030040 


052S06 

V • WWW 








f 7 AO 


Oil 364 

V A A • w V 


041916 

W A 9 A V 


044924 


047117 

V V ' A A ' 










011373 

V A A • ' • 


020040 
v • vw ^ w 


043536 


053101 








1743 


Oil 100 


05 1 1 1 7 


030040 


047501 








1741 


oil 106 

W A A # W 


047116 


041505 


043534 








1744 


011114 

u A A * A ' 


030104 


047924 


000 








1 749 


01 1 331 


015 


030013 


030040 


HISPI 


•ASCII 


<15><13>/ / 


1 746 


01 1 )36 


030040 


020040 


000040 








1747 


01 1314 


030040 


000040 




MISPI 


•ASCIZ 


/ / 


1741 


Oil 140 


030040 


047 111 


053530 


MFUNI 


(ASCIZ 


/ INPUT / 


1749 


Oil J46 

w A A ' ^ V 


030134 


020040 


030040 








17S0 


01 1394 


000 












1791 


01 1399 


040 


047440 


093125 


MrUNC2l 


■ASCIZ 


1 OUTPUT N/A i 


17S3 


01 1 163 


092930 


020124 


020040 








17SJ 


Oil 170 


020040 


047040 


040497 








i 754 


01 1176 


030040 


000040 










17SS 


01 1403 


009015 


000093 




MSTAPI 


•ASCIZ 


<15><13>/*/ 


175* 


0 1 1406 


005015 


092523 


047116 


MRUNI 


(ASCIZ 


«15><12>/PUNNINC.,(/ 


1 757 


011414 


047 111 


027107 


027096 








1 751 


011433 


000 












1759 


01 1431 


015 


042412 


0421 16 


NCOPI 


•ASCIZ 


<15><13>/CN0 PASS / 


1760 


01 1430 


090040 


051501 


02012J 








17A1 

A ■ V A 


01 1436 


000040 












17C3 


011440 


009019 


040520 


091921 


MSUMI 


•ASCIZ 


<19><13>/PASSCS eHR0RS/<19»<12> 


17t] 


011446 


091909 


020040 


042440 








1764 


011454 


091 122 


09 1 1 1 7 


006923 








176S 


011463 


000013 












1766 


011464 


009019 


042522 


052524 


PUWERl 


(ASCIZ 


<15>«12>/ReTURN TO MONITOR rRCC POWLR 


1767 


011473 


047133 


052040 


020117 








1761 


OUSOO 


047919 


044516 


047524 








1769 


011906 


030133 


091106 


046517 








1770 


011914 


050040 


053917 


051105 








1771 


011532 


043040 


044501 


092514 








1773 


011530 


043932 


000 










177J 




011934 












1774 


011934 


000000 






TTYIMPI 


000000 




1779 


011936 


009019 






UKKXNiil 


(ASCII 


<15><12>// 


1776 


011540 


000000 






TTYINBI 


000000 




1777 




011643 








••(♦100 




1771 




000001 






.tlNO 







MAINDEC*11*0ZKH»«A 


MACYll 


.624 2H*JAN»7« 


10108 


PACE 3B 








OZKHA, 


SRC SYMBOL 


TABLE 
















&INT 


003214 


AINTER 




003444 


BI70 


■ 000001 


BITOO 


■ 


000001 


BITOl 


■ 000002 


BIT02 


■ 


000004 


BIT03 


■ 000010 


BIT04 


a 


0000^0 


BITOS 


■ 000040 


BIT06 


■ 


000100 


BIT07 


■ 000200 


BITOl 


■ 


000400 


BIT09 


■ 001000 


BITI 


■ 


000002 


BITIO 


■ 002000 


BITll 


■ 


004000 


BITI2 


■ 010000 


BXT13 


■ 


020000 


BIT14 


■ 040000 


BXT15 


■ 


100000 


BITS 


■ 000004 


BXT3 


■ 


000010 


BIT4 


■ 000020 


BXT5 


■ 


000040 


BITB 


■ 000100 


BXT7 


■ 


000200 


BITS 


■ 000400 


BIT9 


■ 


001000 


BPTVEC 


■ 000014 


crLC 




004330 


DATAR 


002042 


DATASC 




001702 


DATAO 


002114 


DATAl 




001764 


DF.SIFR 


004030 


DFl 


■ 


000000 


DHl 


010476 


DH2 




010611 


DH3 


010706 


0H4 




OUOOJ 


DH5 


011102 


DH7 




011137 


DISPLA 


■ 177570 


OTl 




007534 


DTJ 


007S40 


0T3 




007552 


DT4 


007564 


DT5 




007600 


DT« 


■ 000000 


D'JAL 




003072 


DUALT 


003126 


DUALl 




003064 


CCONH 


007416 


EMTVEC 


• 


000030 


CMl 


007606 


EMU 




010247 


EM12 


010275 


EMI 3 




010335 


EM14 


010376 


EM2 




007640 


ENJ 


00770J 


EN4 




007760 


EM5 


010041 


EM6 




010066 


EM7 


010171 


EOPT 




007500 


ERRVEC 


■ 000004 


INADR 




004332 


XNADUX 


004904 


XNADRO 




004572 


mxT 


002730 


INITR 




003044 


XNMAP 


00S314 


XNMAPl 




005362 


XRNOR 


009036 


XNTPO 




004304 


XNTPOl 


004316 


INTRSl 




003476 


XNTRS2 


0C3510 


XNTR83 




003522 


XNTRS4 


' 00JS34 


XNUMB 




004372 


XNUNC 


005100 


INVET 




004660 


XNVETT 


005024 


XNVET2 




005026 


XOTVCC 


• 000020 


MAPI 




005474 


MBS 


011174 


MCONC 




011167 


NCRLF 


011176 


MCOP 




011423 


MFUN 


011340 


MrUNC2 




0113»5 


MMND 


011234 


MODADR 




011201 


NODI A 


004240 


MOD IV 




004260 


M0D2A 


004242 


M0D2V 




004262 


N0D3A 


004244 


M0D3V 




004264 


M0D4A 


004246 


M0D4V 




004266 


NODSA 


004250 


M0D5C 




004270 


M0D6A 


004252 


M006C 




004272 


M0D7A 


004254 


M0D7C 




004274 


MODIA 


004296 


MODIC 




004276 


NRUN 


011406 


MSTAR 




011402 


HtUM 


011440 


MJ8P 




011334 


NtSP 


011321 


NXNP 




004900 


NXNPT 


004902 


NTPO 




004910 


MTFl 


004976 


WTr2 




007274 


IITF3 


007304 


IITF3A 




007312 


NTP3B 


004714 


NTr4 




007316 


NTH 


007200 


NTHF 




007252 


NTHFP 


007254 


NUMBER 




004000 


ODDADR 


004226 


9C 


■%000007 


P0PSP2 


■ 022626 


POHER 




011464 


PS 


■ 177776 


PSH 


■ 


177776 


PHBVCC 


■ 000024 


R CSV EC 


■ 


000010 


RUBF 


003776 


RUBH 




003724 


RO 


■%000000 


Rl 


«%000001 


R2 


■%000002 


113 


■%000003 


R4 


■%000004 


R5 


■%000005 


R6 


■%000006 


R7 


•1000007 


srxvc 


004302 


SINCO 




009130 


SINGLE 


001612 


SINCLP 




001676 


SXNT 


002230 


8INTR 




002310 


8XNT4 


002320 


8INT4R 




002402 


SXKT9 


002412 


8XNT9R 




002932 


SXNT* 


002992 


8XNT6II 




0026J2 


SINT7 


002644 


SXNT7R 




002716 


SP 


•«000006 


STACK 


■ 


001100 


STAR 


005542 


START 




001446 


8TART1 


001476 


START2 




001512 


START} 


001526 


START4 




001950 


STARTS 


001972 


SUM 




005476 


SHR 


■ 177570 


SHO 


■ 


000001 


SHOO 


■ 000001 


SUOl 


• 


000002 


SN02 


■ 000004 


SH03 


■ 


000010 


SH04 


• 000020 


SHOS 


■ 


000040 


SH06 


■ 000100 


SH07 


■ 


000200 


SHOi 


■ 000400 


SW09 


■ 


001000 


SHI 


B 000002 


8H10 


■ 


002000 


8U11 


■ 004000 


SH12 


■ 


010000 


SHU 


■ 020000 


SN14 


• 


040000 


8H15 


■ 100000 


SH2 


■ 


000004 


SNl 


■ 000010 


SH4 


■ 


000020 


8H9 


■ 000040 


8U6 


■ 


000100 


SM7 


■ 000200 


swi 


■ 


000400 


SN9 


■ 001000 


819 




005030 


S16 


009032 


SI7 




009034 


TBXTVC 


■ 000014 


TRAPVC 


B 


000034 


TRTVCC 


■ 000014 


TTYIN 




003946 


TTYINB 


011540 


TTYIMP 




011534 


TYPE 


■ 104400 


TYPOC 


■ 


104402 


TYPON 


■ 104406 


TYPOS 


■ 


104404 


UNKXNP 


004164 


UNKINM 




011936 


VECTOR 


004300 


•BDADR 




001244 
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•BDCAT 


001230 


•CHI 


■ 


000006 


.•C>4i 


■ 


000014 


• C J 


B OOOOCh 


•CM4 


■ 000004 


•CRLF 




OOlJO] 


•DOACN 




0060i0 


ItliOAD 


006020 


•ENDCT 


006004 


• EOF 




005762 


•ERFLC 




001231 


•tPHAD 


001340 


tCRROD 


00b212 


•ERRTB 




001J06 


•ERRTY 




006J03 


•LRTTL 


001210 


•riLLC 


0OM06 


•rZLLS 




OOllOS 


•CDAOR 




001242 


•CDDAT 


001246 


•CET42 


006013 


•ND 


■ 


OOOOOJ 


•NINUM 




007010 


• ZCNT 


001222 


SILLUP 


007172 


•ITEMS 




001236 


•Lr 




001104 


•LONUM 


007017 


SLPADP 


001224 


•LPERH 




001226 


•MXCNT 




006210 


• NULL 


001104 


• OCNT 


006660 


•OMOOE 




■^06662 


•OVLR 




006174 


• PASS 


001216 


•PtaRDN 


007044 


•PkRUP 




007112 


• OUCS 




001102 


• RAND 


006664 


IREGAD 


0012b2 


• PECO 




001254 


• RECl 




001256 


• REC2 


001260 


• REC3 


001262 


• REC4 




001264 


• RECS 




001266 


•SAVR6 


007176 


•&COPC 


0060J4 


•SETUP 


• 


000017 


•ss 


■ 


000001 


• STUP 


■ 177777 


•SVLAD 


006164 


• SHR 


■ 


164000 


•TIKES 




OOllOO 


• TKB 


001732 


• TK5 


00J720 


• THPO 




001270 


• TMPl 




001272 


• TMP3 


001274 


• TMPJ 


001276 


• TN 


■ 


000001 


• TPB 




001102 


•TPFLC 


001107 


■ TPS 


001100 


• TRAP 




007014 


• TRP 


■ 


000010 


•TRPAD 


007014 


• TSTNf* 


001220 


• TYPE 




OOlUO 


ITYPOC 




0064*2 


•TYPON 


00*476 


•TYPOS 


0064J6 


•XTSTR 




006042 


•oriLL 




006S6I 


■ 


■ 011*43 



ERRORS DETECTEDl 0 
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OZKHA.SPC 

•DZKHA,0ZKHA/80L.DZKHA,8RC 
RUN-TIMEI 21 1] 0 SECONDS 
CORE USEDI i2K 



